[LON-CAPA-cvs] cvs: loncom /interface lonmeta.pm

raeburn lon-capa-cvs@mail.lon-capa.org
Tue, 02 Jan 2007 19:38:20 -0000


raeburn		Tue Jan  2 14:38:20 2007 EDT

  Modified files:              
    /loncom/interface	lonmeta.pm 
  Log:
  Tighten up the regexp.
  
  
Index: loncom/interface/lonmeta.pm
diff -u loncom/interface/lonmeta.pm:1.192 loncom/interface/lonmeta.pm:1.193
--- loncom/interface/lonmeta.pm:1.192	Tue Jan  2 07:54:40 2007
+++ loncom/interface/lonmeta.pm	Tue Jan  2 14:38:17 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Metadata display handler
 #
-# $Id: lonmeta.pm,v 1.192 2007/01/02 12:54:40 raeburn Exp $
+# $Id: lonmeta.pm,v 1.193 2007/01/02 19:38:17 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1410,10 +1410,10 @@
     my ($udom,$uname,$remainder) =
         ($uri=~m -^/+(?:uploaded|editupload)/+($match_domain)/+($match_name)/+(.*)$-);
 
-    if ($remainder =~ /groups\/(\w+)\/portfolio(\/.+)$/) {
+    if ($remainder =~ /^groups\/(\w+)\/portfolio(\/.+)$/) {
         $group = $1;
         $file_name = $2;
-    } elsif ($remainder =~ /portfolio(\/.+)$/) {
+    } elsif ($remainder =~ /^portfolio(\/.+)$/) {
         $file_name = $1;
     }
     $file_name =~ s/\.meta$//;