[Rt-commit] [svn] r1337 - rt/branches/3.2-RELEASE/bin

[alexmv at pallas.eruditorum.org]

Author: alexmv
Date: Tue Aug 17 15:03:04 2004
New Revision: 1337

Modified:
   rt/branches/3.2-RELEASE/bin/rt.in
Log:
RT-Ticket: 5820
RT-Update: correspond
RT-Status: resolved

 * Use "local $_" to prevent "modification of read-only value..."
   caused by aliasing $_ to a constant


Modified: rt/branches/3.2-RELEASE/bin/rt.in
==============================================================================
--- rt/branches/3.2-RELEASE/bin/rt.in	(original)
+++ rt/branches/3.2-RELEASE/bin/rt.in	Tue Aug 17 15:03:04 2004
@@ -1171,6 +1171,7 @@
 sub parse_config_file {
     my %cfg;
     my ($file) = @_;
+    local $_; # $_ may be aliased to a constant, from line 1163
 
     open(CFG, $file) && do {
         while (<CFG>) {