version 1.3, 2005/04/07 06:56:22
|
version 1.5, 2008/08/26 01:35:15
|
Line 1
|
Line 1
|
|
# The LearningOnline Network |
|
# |
|
# $Id$ |
|
# |
# Copyright Michigan State University Board of Trustees |
# Copyright Michigan State University Board of Trustees |
# |
# |
# This file is part of the LearningOnline Network with CAPA (LON-CAPA). |
# This file is part of the LearningOnline Network with CAPA (LON-CAPA). |
Line 152 sub external {
|
Line 156 sub external {
|
my ($symb,$title) = @_; |
my ($symb,$title) = @_; |
my $output; |
my $output; |
if ($symb =~ m-\.sequence___\d+___ext(.+)$-) { |
if ($symb =~ m-\.sequence___\d+___ext(.+)$-) { |
my $exturl = &Apache::lonnet::unescape($1); |
my $exturl = &unescape($1); |
$output = qq| |
$output = qq| |
<html> |
<html> |
<head><title>$title</title> |
<head><title>$title</title> |