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

bisitz bisitz@source.lon-capa.org
Fri, 27 Mar 2009 12:26:10 -0000


bisitz		Fri Mar 27 12:26:10 2009 EDT

  Modified files:              
    /loncom/interface	lontemplate.pm loncommon.pm 
  Log:
  Replaced handmade list for functions by proper HTML list
  Added styles to get float, nowrap, spaces and horizontal list alignment characteristics
  
  
Index: loncom/interface/lontemplate.pm
diff -u loncom/interface/lontemplate.pm:1.25 loncom/interface/lontemplate.pm:1.26
--- loncom/interface/lontemplate.pm:1.25	Tue Mar 24 10:22:03 2009
+++ loncom/interface/lontemplate.pm	Fri Mar 27 12:26:10 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # "Template" Functions to generate html output
 #
-# $Id: lontemplate.pm,v 1.25 2009/03/24 10:22:03 amueller Exp $
+# $Id: lontemplate.pm,v 1.26 2009/03/27 12:26:10 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -111,7 +111,7 @@
 sub send_message{
 	my ($r,$cnum,$cdom) = @_;
 	my $s;
-	my $image = qq{<img name="Send message" src="/res/adm/pages/com.png" border="none" />};	
+	my $image = qq{<img name="Send message" src="/res/adm/pages/com.png" border="none" align="middle" />};	
 	$s=&Apache::loncommon::messagewrapper($image,$cnum,$cdom).' '.&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom);	
 	return $s;	
 }
@@ -147,15 +147,16 @@
 {
 	my($r)=@_;	
 	$r->print('<fieldset><legend>'. &mt('Functions') . '</legend>');	
+	$r->print('<ul class="LC_functionslist">');	
 }
 sub print_functions_content
 {
 	my($r,$content) = @_;
-	$r->print('<span class="LC_nobreak">&bull; '.$content.'</span> ');	
+	$r->print('<li>'.$content.'</li>');	
 }
 sub print_end_page_functions
 {
 	my($r)=@_;
-	$r->print('</fieldset>');
+	$r->print('</ul></fieldset>');
 }
 1;
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.781 loncom/interface/loncommon.pm:1.782
--- loncom/interface/loncommon.pm:1.781	Fri Mar 27 04:59:30 2009
+++ loncom/interface/loncommon.pm	Fri Mar 27 12:26:10 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.781 2009/03/27 04:59:30 raeburn Exp $
+# $Id: loncommon.pm,v 1.782 2009/03/27 12:26:10 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6003,6 +6003,13 @@
 	background-color:transparent;
 }
 
+ul.LC_functionslist li {
+  float: left;
+  white-space: nowrap;
+  height: 35px; /* at least as high as heighest list item */
+  margin: 0px 15px 15px 10px;
+}
+
 
 END
 }