[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">• '.$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
}