summaryrefslogtreecommitdiff
path: root/usr.sbin/pkg_add/OpenBSD/Mtree.pm
diff options
context:
space:
mode:
authorMarc Espie <espie@cvs.openbsd.org>2008-10-20 10:25:17 +0000
committerMarc Espie <espie@cvs.openbsd.org>2008-10-20 10:25:17 +0000
commiteaebd8142928ba1b0d5fe3a62f964c99fd875888 (patch)
tree7455dca1904b029f68651be5c0285017b8e3a085 /usr.sbin/pkg_add/OpenBSD/Mtree.pm
parent782d0d3eb7b8f71c782a07fbb33aefe93a000d53 (diff)
Say goodbye to local $_
lexical scoping is so much neater (courtesy of perl 5.10)
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD/Mtree.pm')
-rw-r--r--usr.sbin/pkg_add/OpenBSD/Mtree.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/Mtree.pm b/usr.sbin/pkg_add/OpenBSD/Mtree.pm
index 7fe29ebeb15..ba287b95547 100644
--- a/usr.sbin/pkg_add/OpenBSD/Mtree.pm
+++ b/usr.sbin/pkg_add/OpenBSD/Mtree.pm
@@ -1,5 +1,5 @@
# ex:ts=8 sw=4:
-# $OpenBSD: Mtree.pm,v 1.5 2008/06/20 14:31:38 espie Exp $
+# $OpenBSD: Mtree.pm,v 1.6 2008/10/20 10:25:16 espie Exp $
#
# Copyright (c) 2004-2005 Marc Espie <espie@openbsd.org>
#
@@ -26,7 +26,7 @@ use File::Spec;
sub parse_fh
{
my ($mtree, $basedir, $fh) = @_;
- local $_;
+ my $_;
while(<$fh>) {
chomp;
s/^\s*//o;