[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');
 	}