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

[albertel]

albertel		Tue Aug 24 03:35:57 2004 EDT

  Modified files:              
    /loncom/interface	portfolio.pm 
  Log:
  - make it easier to get back to /
  
  
Index: loncom/interface/portfolio.pm
diff -u loncom/interface/portfolio.pm:1.28 loncom/interface/portfolio.pm:1.29
--- loncom/interface/portfolio.pm:1.28	Tue Aug 24 03:29:51 2004
+++ loncom/interface/portfolio.pm	Tue Aug 24 03:35:57 2004
@@ -180,7 +180,7 @@
     $r->print($displayOut);
     $r->print('</td></tr></table>');
     my @tree = split (/\//,$current_path);
-    $r->print('<font size="+2">'.&make_anchor('/','/'));
+    $r->print('<font size="+2">'.&make_anchor('portfolio','/').'/');
     if (@tree > 1){
         my $newCurrentPath = '';
         for (my $i = 1; $i< @tree; $i++){