[LON-CAPA-cvs] cvs: loncom /interface londocs.pm
albertel
lon-capa-cvs-allow@mail.lon-capa.org
Tue, 22 May 2007 00:38:25 -0000
albertel Mon May 21 20:38:25 2007 EDT
Modified files:
/loncom/interface londocs.pm
Log:
- fix adding external resource and aboutme pages
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.272 loncom/interface/londocs.pm:1.273
--- loncom/interface/londocs.pm:1.272 Tue May 1 21:33:48 2007
+++ loncom/interface/londocs.pm Mon May 21 20:38:25 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.272 2007/05/02 01:33:48 albertel Exp $
+# $Id: londocs.pm,v 1.273 2007/05/22 00:38:25 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -936,8 +936,8 @@
$LONCAPA::map::order[$#LONCAPA::map::order+1]=$idx;
my $ext = 'false';
if ($url=~m{^http://} || $url=~m{^https://}) { $ext = 'true'; }
- $url =~ &LONCAPA::map::qtunescape($url);
- $name =~ &LONCAPA::map::qtunescape($name);
+ $url = &LONCAPA::map::qtunescape($url);
+ $name = &LONCAPA::map::qtunescape($name);
$LONCAPA::map::resources[$idx] =
join ':', ($name, $url, $ext, 'normal', 'res');
}