From 6645057d2a172397994859fec429d9dcfc53a1a5 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Fri, 14 Nov 2003 11:00:19 +0000 Subject: gc sux --- move/move.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'move') diff --git a/move/move.pm b/move/move.pm index f8ec221a2..df7216d8b 100644 --- a/move/move.pm +++ b/move/move.pm @@ -206,7 +206,7 @@ sub install2::handleMoveKey { sub install2::verifyKey { my ($o) = $::o; - while (!any { m|\s/home\s| } cat_('/proc/mounts')) { + while (cat_('/proc/mounts') !~ m|\s/home\s|) { $o->ask_okcancel_({ title => N("Need a key to save your data"), messages => formatAlaTeX( @@ -272,7 +272,7 @@ sub install2::startMove { #- automatic printer, timezone, network configs require install_steps_interactive; - if (!any { /nfs/ } cat_('/proc/mounts')) { + if (cat_('/proc/mounts') =~ /nfs/) { install_steps_interactive::configureNetwork($o); #- seems that applications have trouble with the loopback interface #- after successful network configuration if we don't do that -- cgit v1.2.1