loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

-version 1.173, 2006/12/11 21:56:53
+version 1.174, 2006/12/14 20:49:23
  Line 407  ENDHEADER
  # --------------------------------------------------------------- Error Header?
      if ($error) {
  	$r->print("<h1>LON-CAPA Access Control</h1>");
-         $r->print("<!-- LONCAPAACCESSCONTROLERRORSCREEN --><hr /><pre>Access  : ".
+ 	$r->print("<!-- LONCAPAACCESSCONTROLERRORSCREEN --><hr /><pre>");
-                   Apache::lonnet::plaintext($priv)."\n");
+ 	if ($priv ne '') {
-         $r->print("Resource: ".&Apache::lonenc::check_encrypt($fn)."\n");
+ 	    $r->print("Access  : ".&Apache::lonnet::plaintext($priv)."\n");
-         $r->print("Action  : $msg\n</pre><hr />");
+ 	}
+ 	if ($fn ne '') {
+ 	    $r->print("Resource: ".&Apache::lonenc::check_encrypt($fn)."\n");
+ 	}
+ 	if ($msg ne '') {
+ 	    $r->print("Action  : $msg\n");
+ 	}
+ 	$r->print("</pre><hr />");
  	my $url=$fn;
  	my $last;
  	if (tie(my %hash,'GDBM_File',$env{'request.course.fn'}.'_symb.db',