aboutsummaryrefslogtreecommitdiffstats
path: root/park-rpmdrake
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-09-22 08:27:05 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-09-22 08:27:05 +0000
commit5a66140a8116c0d7a651641bc622d6a8c0e80887 (patch)
treedd4e1a23ad271a8ad0ab6f2ed6c543af0c076681 /park-rpmdrake
parent901c1d7f457d7f36a7825feebb4181505294c1e0 (diff)
downloadrpmdrake-5a66140a8116c0d7a651641bc622d6a8c0e80887.tar
rpmdrake-5a66140a8116c0d7a651641bc622d6a8c0e80887.tar.gz
rpmdrake-5a66140a8116c0d7a651641bc622d6a8c0e80887.tar.bz2
rpmdrake-5a66140a8116c0d7a651641bc622d6a8c0e80887.tar.xz
rpmdrake-5a66140a8116c0d7a651641bc622d6a8c0e80887.zip
- adapt to new scanssh
- remove debug code
Diffstat (limited to 'park-rpmdrake')
-rwxr-xr-xpark-rpmdrake3
1 files changed, 1 insertions, 2 deletions
diff --git a/park-rpmdrake b/park-rpmdrake
index abbf2fbb..45fd7acf 100755
--- a/park-rpmdrake
+++ b/park-rpmdrake
@@ -3,7 +3,6 @@
use Socket;
use lib qw(/usr/lib/libDrakX);
-use lib qw(/home/pixel/gi/perl-install);
use interactive::gtk;
use run_program;
use standalone;
@@ -64,7 +63,7 @@ sub host_to_string {
sub scanssh_output_to_hosts {
[ map {
chomp;
- if (my ($ip, $_version) = /(\S+) ([^<].*)/) {
+ if (my ($ip, $_version) = /([.\d]+)/) {
raw_host_to_host($ip);
} else {
();