--- loncom/interface/lonpreferences.pm 2009/10/09 01:44:26 1.125.4.7 +++ loncom/interface/lonpreferences.pm 2009/10/09 04:13:55 1.125.4.8 @@ -1,7 +1,7 @@ # The LearningOnline Network # Preferences # -# $Id: lonpreferences.pm,v 1.125.4.7 2009/10/09 01:44:26 raeburn Exp $ +# $Id: lonpreferences.pm,v 1.125.4.8 2009/10/09 04:13:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2041,7 +2041,7 @@ sub handler { })); } - if ($env{'user.name'} =~ /^(albertel|fox|foxr|kortemey|korte|raeburn)$/) { + if (&can_toggle_debug()) { push (@Options,({ action => 'debugtoggle', printmenu => 'yes', subroutine => \&toggle_debug, @@ -2076,7 +2076,7 @@ sub handler { if (&can_toggle_debug()) { push (@Options,({ action => 'debugtoggle', linktext => 'Toggle Debug Messages', - text => 'Current Debug status is -'. + text => 'Current Debug status is: '. ($env{'user.debug'} ? 'on' : 'off'), href => '/adm/preferences', printmenu => 'yes',