loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.233, 2008/01/20 22:25:05	version 1.235, 2008/02/22 05:05:57
Line 1321 ENDBADAUTH	Line 1321 ENDBADAUTH
$outcome .= <<ENDNOPRIV;	$outcome .= <<ENDNOPRIV;
<h3>$lt{'ccld'}</h3>	<h3>$lt{'ccld'}</h3>
$lt{'yodo'} $lt{'ifch'}: $ccdomain	$lt{'yodo'} $lt{'ifch'}: $ccdomain
	<input type="hidden" name="login" value="nochange" />
ENDNOPRIV	ENDNOPRIV
}	}
}	}
Line 3091 sub print_main_menu {	Line 3092 sub print_main_menu {
foreach my $menu_item (@menu) {	foreach my $menu_item (@menu) {
next if (! $menu_item->{'permission'});	next if (! $menu_item->{'permission'});
$menu_html.='<p>';	$menu_html.='<p>';
	if (exists($menu_item->{'help'})) {
	$menu_html.=
	&Apache::loncommon::help_open_topic($menu_item->{'help'});
	}
$menu_html.='<font size="+1">';	$menu_html.='<font size="+1">';
if (exists($menu_item->{'url'})) {	if (exists($menu_item->{'url'})) {
$menu_html.=qq{<a href="$menu_item->{'url'}">};	$menu_html.=qq{<a href="$menu_item->{'url'}">};
Line 3099 sub print_main_menu {	Line 3104 sub print_main_menu {
qq{<a href="/adm/createuser?action=$menu_item->{'action'}">};	qq{<a href="/adm/createuser?action=$menu_item->{'action'}">};
}	}
$menu_html.= &mt($menu_item->{'text'}).'</a></font>';	$menu_html.= &mt($menu_item->{'text'}).'</a></font>';
if (exists($menu_item->{'help'})) {
$menu_html.=
&Apache::loncommon::help_open_topic($menu_item->{'help'});
}
$menu_html.='</p>';	$menu_html.='</p>';
}	}
return $menu_html;	return $menu_html;