diff options
author | rmanfredi <rmanfredi@190e5f8e-a817-0410-acf6-e9863daed9af> | 2008-05-28 08:05:12 +0000 |
---|---|---|
committer | rmanfredi <rmanfredi@190e5f8e-a817-0410-acf6-e9863daed9af> | 2008-05-28 08:05:12 +0000 |
commit | c60be23afb65013ff10354cece62d7b3e29ca339 (patch) | |
tree | 1cbef0d0037a51decea0adb5c834777230f5df84 /mcon/pl | |
parent | a2f5d6f1d076aa5bebcb4f897b746b2658895cb0 (diff) |
Removed last instance of $*, no longer supported in Perl 5.10.
git-svn-id: https://dist.svn.sourceforge.net/svnroot/dist/trunk/dist@23 190e5f8e-a817-0410-acf6-e9863daed9af
Diffstat (limited to 'mcon/pl')
-rw-r--r-- | mcon/pl/files.pl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/mcon/pl/files.pl b/mcon/pl/files.pl index 9e6bd08..3962fa6 100644 --- a/mcon/pl/files.pl +++ b/mcon/pl/files.pl @@ -102,8 +102,7 @@ EOF # Remove ':' quotations in front of the lines sub q { local($_) = @_; - local($*) = 1; - s/^://g; + s/^://gm; $_; } |