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

[matthew]

matthew		Tue Apr  6 11:07:41 2004 EDT

  Modified files:              
    /loncom/interface	lonhtmlcommon.pm lonmeta.pm 
  Log:
  lonhtmlcommon.pm: Modified &crumbs to take the font size of the breadcrumb
  as a parameter.
  lonmeta.pm: Modified to use the new size parameter for lonhtmlcommon::crumbs.
  
  
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.61 loncom/interface/lonhtmlcommon.pm:1.62
--- loncom/interface/lonhtmlcommon.pm:1.61	Tue Mar  9 10:06:48 2004
+++ loncom/interface/lonhtmlcommon.pm	Tue Apr  6 11:07:41 2004
@@ -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 @@
 # ------------------------------------------------------- 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)) {
Index: loncom/interface/lonmeta.pm
diff -u loncom/interface/lonmeta.pm:1.61 loncom/interface/lonmeta.pm:1.62
--- loncom/interface/lonmeta.pm:1.61	Wed Mar 31 00:24:00 2004
+++ loncom/interface/lonmeta.pm	Tue Apr  6 11:07:41 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Metadata display handler
 #
-# $Id: lonmeta.pm,v 1.61 2004/03/31 05:24:00 albertel Exp $
+# $Id: lonmeta.pm,v 1.62 2004/04/06 15:07:41 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -302,8 +302,8 @@
 	($type eq 'sequsage_list')) {
 	return join('<br />',map {
 	       my $url=&Apache::lonnet::clutter($_);
-	       '<br /><b>'.&Apache::lonnet::gettitle($url).'</b>'.
-	       &Apache::lonhtmlcommon::crumbs($url,'preview','');
+	       '<b>'.&Apache::lonnet::gettitle($url).'</b>'.
+	       &Apache::lonhtmlcommon::crumbs($url,'preview','',undef,'+0');
 	    } split(/\s*\,\s*/,$value));
     }
 # Evaluations