--- loncom/interface/loncommon.pm 2007/05/09 23:53:15 1.533 +++ loncom/interface/loncommon.pm 2007/05/15 20:05:13 1.535 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.533 2007/05/09 23:53:15 raeburn Exp $ +# $Id: loncommon.pm,v 1.535 2007/05/15 20:05:13 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1467,6 +1467,8 @@ sub home_server_option_list { =pod +=back + =cut ############################################################### @@ -3375,7 +3377,7 @@ sub bodytag { my $pgbg = $bgcolor || &designparm($function.'.pgbg',$domain); my %design = ( 'style' => 'margin-top: 0px', - 'bgcolor' => '#ffffff', + 'bgcolor' => $pgbg, 'text' => $font, 'alink' => &designparm($function.'.alink',$domain), 'vlink' => &designparm($function.'.vlink',$domain),