--- loncom/auth/lonlogin.pm 2008/09/24 17:05:37 1.105 +++ loncom/auth/lonlogin.pm 2008/12/10 17:45:29 1.106.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.105 2008/09/24 17:05:37 bisitz Exp $ +# $Id: lonlogin.pm,v 1.106.2.1 2008/12/10 17:45:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -201,7 +201,7 @@ sub handler { $hostname. '/adm/login?domain='.$authdomain.'">'. $hostname.''. - ' (preferred)'.$/; + ' '.&mt('(preferred)').''.$/; $last=$hostname; } $spares.= '
'; @@ -266,6 +266,14 @@ sub handler { if ($login eq '') { $login = $iconpath.'/'.&mt('userauthentication.gif'); } + my $showbanner = 1; + my $showmainlogo = 1; + if (defined(&Apache::loncommon::designparm('login.showlogo_img',$domain))) { + $showbanner = &Apache::loncommon::designparm('login.showlogo_img',$domain); + } + if (defined(&Apache::loncommon::designparm('login.showlogo_logo',$domain))) { + $showmainlogo = &Apache::loncommon::designparm('login.showlogo_logo',$domain); + } my $showadminmail=&Apache::loncommon::designparm('login.adminmail',$domain); my $showcoursecat = &Apache::loncommon::designparm('login.coursecatalog',$domain); @@ -410,12 +418,21 @@ ENDSERVERFORM if ($shownewuserlink) { $newuserlink = &newuser_link($lt{'newuser'}); } - if ($fullgraph) { $r->print(<print(< - The Learning Online Network with CAPA + +HEADER + if ($showbanner) { + $r->print(< +ENDBANNER + } + $r->print(< @@ -459,9 +476,15 @@ ENDSERVERFORM +ENDSTART + if ($showmainlogo) { + $r->print(< +ENDLOGO + } + $r->print(< @@ -473,11 +496,11 @@ ENDSERVERFORM ENDTOP -} else { - $r->print('

The LearningOnline Network with CAPA

' - .'

'.&mt('Text-based Interface Login').'

' - .$announcements); -} + } else { + $r->print('

The LearningOnline Network with CAPA

' + .'

'.&mt('Text-based Interface Login').'

' + .$announcements); + } $r->print('
'); unless ($fullgraph) { $r->print(< $lt{'remember'}
ENDACCESSOPTIONS -} else { - $r->print(<print(< @@ -499,7 +522,7 @@ ENDACCESSOPTIONS ENDNOOPT -} + } my $logintitle; if ($loginheader eq 'text') { $logintitle = '   '.$lt{'log'}.'';