--- loncom/interface/lonhtmlcommon.pm	2004/03/09 15:06:48	1.61
+++ loncom/interface/lonhtmlcommon.pm	2004/04/06 15:07:41	1.62
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.61 2004/03/09 15:06:48 www Exp $
+# $Id: lonhtmlcommon.pm,v 1.62 2004/04/06 15:07:41 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -814,8 +814,11 @@ sub r_print {
 # ------------------------------------------------------- Puts directory header
 
 sub crumbs {
-    my ($uri,$target,$prefix,$form)=@_;
-    my $output='<br /><tt><b><font size="+2">'.$prefix.'/';
+    my ($uri,$target,$prefix,$form,$size)=@_;
+    if (! defined($size)) {
+        $size = '+2';
+    }
+    my $output='<br /><tt><b><font size="'.$size.'">'.$prefix.'/';
     if ($ENV{'user.adv'}) {
 	my $path=$prefix.'/';
 	foreach (split('/',$uri)) {