diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2008-10-20 10:25:17 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2008-10-20 10:25:17 +0000 |
| commit | eaebd8142928ba1b0d5fe3a62f964c99fd875888 (patch) | |
| tree | 7455dca1904b029f68651be5c0285017b8e3a085 /usr.sbin/pkg_add/pkg_mklocatedb | |
| parent | 782d0d3eb7b8f71c782a07fbb33aefe93a000d53 (diff) | |
Say goodbye to local $_
lexical scoping is so much neater (courtesy of perl 5.10)
Diffstat (limited to 'usr.sbin/pkg_add/pkg_mklocatedb')
| -rw-r--r-- | usr.sbin/pkg_add/pkg_mklocatedb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/pkg_mklocatedb b/usr.sbin/pkg_add/pkg_mklocatedb index 37863508218..a1cb69db062 100644 --- a/usr.sbin/pkg_add/pkg_mklocatedb +++ b/usr.sbin/pkg_add/pkg_mklocatedb @@ -1,6 +1,6 @@ #! /usr/bin/perl # Copyright (c) 2005-2007 Marc Espie <espie@openbsd.org> -# $OpenBSD: pkg_mklocatedb,v 1.19 2008/10/10 04:35:31 steven Exp $ +# $OpenBSD: pkg_mklocatedb,v 1.20 2008/10/20 10:25:16 espie Exp $ # # Permission to use, copy, modify, and distribute this software for any # purpose with or without fee is hereby granted, provided that the above @@ -146,7 +146,7 @@ if ($opt_p) { my $plist = OpenBSD::PackingList->read($in, sub { my ($fh, $cont) = @_; - local $_; + my $_; while (<$fh>) { return if m/^\=\=\=\> /o; next unless m/^\@(?:cwd|name|info|man|file|lib|shell|comment\s+subdir\=)\b/o || !m/^\@/o; |