From: Sam H. v. a. <we...@ma...> - 2005-08-12 15:51:36
|
Log Message: ----------- renamed weird $QuellSubroutineOutput to $DenySubroutineOutput. This will better match $AllowSubroutineOutput. Modified Files: -------------- webwork2/lib/WeBWorK: Constants.pm Debug.pm Revision Data ------------- Index: Debug.pm =================================================================== RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/Debug.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -Llib/WeBWorK/Debug.pm -Llib/WeBWorK/Debug.pm -u -r1.5 -r1.6 --- lib/WeBWorK/Debug.pm +++ lib/WeBWorK/Debug.pm @@ -64,14 +64,14 @@ our $Logfile = "" unless defined $Logfile; -=item $QuellSubroutineOutput +=item $DenySubroutineOutput If defined, prevent subroutines matching the following regular expression from logging. =cut -our $QuellSubroutineOutput; +our $DenySubroutineOutput; =item $AllowSubroutineOutput @@ -104,7 +104,7 @@ if ($Enabled) { my ($package, $filename, $line, $subroutine) = caller(1); return if defined $AllowSubroutineOutput and not $subroutine =~ m/$AllowSubroutineOutput/; - return if defined $QuellSubroutineOutput and $subroutine =~ m/$QuellSubroutineOutput/; + return if defined $DenySubroutineOutput and $subroutine =~ m/$DenySubroutineOutput/; my ($sec, $msec) = gettimeofday; my $date = time2str("%a %b %d %H:%M:%S.$msec %Y", $sec); Index: Constants.pm =================================================================== RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/Constants.pm,v retrieving revision 1.28 retrieving revision 1.29 diff -Llib/WeBWorK/Constants.pm -Llib/WeBWorK/Constants.pm -u -r1.28 -r1.29 --- lib/WeBWorK/Constants.pm +++ lib/WeBWorK/Constants.pm @@ -41,9 +41,9 @@ # logging. # # For example, this pattern prevents the dispatch() function from logging: -# $WeBWorK::Debug::QuellSubroutineOutput = qr/^WeBWorK::dispatch$/; +# $WeBWorK::Debug::DenySubroutineOutput = qr/^WeBWorK::dispatch$/; # -$WeBWorK::Debug::QuellSubroutineOutput = undef; +$WeBWorK::Debug::DenySubroutineOutput = undef; # If defined, allow only subroutines matching the following regular expression # to log. |