From 102cb31b26ba36f59aec876c6513ef4ec6c03fb7 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 31 Jul 2002 10:58:25 +0000 Subject: fix using $_ instead of $_[0] (thanks to perl_checker) --- perl-install/Xconfig/resolution_and_depth.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/Xconfig/resolution_and_depth.pm') diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm index f78509e01..75639d9d0 100644 --- a/perl-install/Xconfig/resolution_and_depth.pm +++ b/perl-install/Xconfig/resolution_and_depth.pm @@ -119,7 +119,7 @@ sub choose { my ($in, $default_resolution, @resolutions) = @_; $in->ask_from_listf(_("Resolutions"), "", - sub { "$_->{X}x$_->{Y} $_->{Depth}bpp" }, + sub { "$_[0]{X}x$_[0]{Y} $_[0]{Depth}bpp" }, \@resolutions, $default_resolution || {}); } -- cgit v1.2.1