--- loncom/interface/lonhtmlcommon.pm	2003/12/22 19:30:25	1.34
+++ loncom/interface/lonhtmlcommon.pm	2003/12/29 19:01:27	1.36
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.34 2003/12/22 19:30:25 www Exp $
+# $Id: lonhtmlcommon.pm,v 1.36 2003/12/29 19:01:27 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -841,12 +841,17 @@ sub Close_PrgWin {
 sub crumbs {
     my ($uri,$target,$prefix)=@_;
     my $output='<br /><tt><b><font size="+2">'.$prefix.'/';
-    my $path=$prefix.'/';
-    foreach (split('/',$uri)) {
-	unless ($_) { next; }
-	$path.=$_.'/';
-	$output.='<a href="'.$path.'"'.($target?' target="'.$target.'"':'').'>'.$_.'</a>/';
+    if ($ENV{'user.adv'}) {
+	my $path=$prefix;
+	foreach (split('/',$uri)) {
+	    unless ($_) { next; }
+	    $path.='/'.$_;
+	    $output.='<a href="'.$path.'"'.($target?' target="'.$target.'"':'').'>'.$_.'</a>/';
+	}
+    } else {
+	$output.=$uri;
     }
+    unless ($uri=~/\/$/) { $output=~s/\/$//; }
     return $output.'</font></b></tt><br />';
 }