[pkgsrc/trunk]: pkgsrc/pkgtools/pkglint/files Code beautification: %{$foo} in...

[rillig <rillig%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/ca09e3dfc63e
branches:  trunk
changeset: 497866:ca09e3dfc63e
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Sat Aug 06 08:08:33 2005 +0000

description:
Code beautification: %{$foo} instead of %$foo.

diffstat:

 pkgtools/pkglint/files/pkglint.pl |  6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diffs (27 lines):

diff -r e1a82787471c -r ca09e3dfc63e pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Sat Aug 06 08:00:14 2005 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Sat Aug 06 08:08:33 2005 +0000
@@ -11,7 +11,7 @@
 # Freely redistributable.  Absolutely no warranty.
 #
 # From Id: portlint.pl,v 1.64 1998/02/28 02:34:05 itojun Exp
-# $NetBSD: pkglint.pl,v 1.228 2005/08/06 02:26:47 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.229 2005/08/06 08:08:33 rillig Exp $
 #
 # This version contains lots of changes necessary for NetBSD packages
 # done by:
@@ -433,12 +433,12 @@
        my ($value, $optdefs) = @_;
        foreach my $opt (split(qr",", $value)) {
                if ($opt eq "none") {
-                       foreach my $key (keys %$optdefs) {
+                       foreach my $key (keys %{$optdefs}) {
                                ${$optdefs->{$key}->[0]} = false;
                        }
 
                } elsif ($opt eq "all") {
-                       foreach my $key (keys %$optdefs) {
+                       foreach my $key (keys %{$optdefs}) {
                                ${$optdefs->{$key}->[0]} = true;
                        }