From e81601509dc5bddad49d75d62c571a07c917c194 Mon Sep 17 00:00:00 2001
From: pad <pad@mandriva.com>
Date: Sat, 4 Sep 1999 18:03:05 +0000
Subject: metter arch

---
 perl-install/install_any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install_any.pm')

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index ff0a674a5..e28bf4e59 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -77,7 +77,7 @@ sub mouse_detect() {
 
 sub shells($) {
     my ($o) = @_;
-    my @l = grep { -x "$o->{prefix}$_" } @{$o->{default}{shells}};
+    my @l = grep { -x "$o->{prefix}$_" } @{$o->{shells}};
     @l ? @l : "/bin/bash";
 }
 
-- 
cgit v1.2.1