diff options
author | Daouda Lo <daouda@mandriva.com> | 2004-03-19 22:04:16 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2004-03-19 22:04:16 +0000 |
commit | 4617805d2840cca66d69704ea56bab5e06f10f94 (patch) | |
tree | 1dbffb0e95cf11a3c743d9009b364a85fd8f6a18 /mdkupdate | |
parent | 7357950277d6493639111ac9bb2d80eb7ca819ba (diff) | |
download | mgaonline-4617805d2840cca66d69704ea56bab5e06f10f94.tar mgaonline-4617805d2840cca66d69704ea56bab5e06f10f94.tar.gz mgaonline-4617805d2840cca66d69704ea56bab5e06f10f94.tar.bz2 mgaonline-4617805d2840cca66d69704ea56bab5e06f10f94.tar.xz mgaonline-4617805d2840cca66d69704ea56bab5e06f10f94.zip |
- remove debugging
Diffstat (limited to 'mdkupdate')
-rwxr-xr-x | mdkupdate | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -73,7 +73,6 @@ if ($o{LOGIN} && $o{PASS} && $o{LOGIN} !~ /\s+/ && $o{PASS} !~ /\s+/) { my $MandrakeUpdateURL = $url->{online3_RemoteAction} . '?action=ScheduledRPM' . '&log=' . $o{LOGIN} . '&pass=' . $o{PASS} . '&host=' . $o{MACHINE} . '&key=' . $o{CURRENTKEY}; my $resp = getFromURL($MandrakeUpdateURL); my $contents = $resp->content; - print "CONTENTS=$contents"; if ($resp->is_success) { if ($contents =~ /TRUE/) { $u = 10 } elsif ($contents = m/(\d+)/) { $u = sprintf("%d", $1) } else { $u = 83 } ; my $action = { @@ -84,11 +83,13 @@ if ($o{LOGIN} && $o{PASS} && $o{LOGIN} !~ /\s+/ && $o{PASS} !~ /\s+/) { if ($c2h->{FTP}) { # for debugging purpose $c2h->{FTP} = 'ftp://ftp.lip6.fr/pub/linux/distributions/mandrake/updates'; - addMedia($c2h->{FTP}) } + addMedia($c2h->{FTP}) + } $scheduled = join(',',@{$c2h->{sched}}); $noscheduled = join(',',@{$c2h->{nosched}}); $noscheduled =~ s/\.rpm//g; printf "SCHEDULED = $scheduled\nNOSCHEDULED = $noscheduled\n"; if ($opt eq '--applet') { + print "MandrakeUpdate --media=mdkupdate --pkg-sel=$scheduled --pkg-nosel=$nosheduled"; system "MandrakeUpdate","--media=mdkupdate","--pkg-sel=$scheduled","--pkg-nosel=$nosheduled"; } elsif ($opt eq '--auto') { $o{AUTO} eq 'TRUE' and autoInstallRpms($c2h->{sched}); |