diff options
| author | Stew Benedict <stewb@mandriva.org> | 2004-06-08 19:18:18 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2004-06-08 19:18:18 +0000 |
| commit | 1a709e0d8f13944775f749ddbed9b7c1eb4a2b49 (patch) | |
| tree | 9173d7712399fd739ca6fecb3280b67feabfbdc1 /perl-install/standalone | |
| parent | a4fd0fd5452765297bd052a4ecf680a0e8a3362f (diff) | |
| download | drakx-backup-do-not-use-1a709e0d8f13944775f749ddbed9b7c1eb4a2b49.tar drakx-backup-do-not-use-1a709e0d8f13944775f749ddbed9b7c1eb4a2b49.tar.gz drakx-backup-do-not-use-1a709e0d8f13944775f749ddbed9b7c1eb4a2b49.tar.bz2 drakx-backup-do-not-use-1a709e0d8f13944775f749ddbed9b7c1eb4a2b49.tar.xz drakx-backup-do-not-use-1a709e0d8f13944775f749ddbed9b7c1eb4a2b49.zip | |
Bugzilla #9877 - deal with kernel ring buffer that is flooded with msgs
for tape device detection.
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakbackup | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 483e68284..acadd8be7 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -223,7 +223,7 @@ sub get_tape_info() { my @line_data; my $info = "$ENV{HOME}/tmp/dmesg"; @tape_devices = (); - system("dmesg | grep 'st[0-9] at' > $info"); + system("dmesg -s 100000 | grep 'st[0-9] at' > $info"); my @info = cat_($info); foreach (@info) { @@ -544,7 +544,7 @@ sub ftp_client() { $ftp = 0; } return 1 if !$ftp; - $ftp->binary(); + $ftp->binary; $ftp->cwd($conf{HOST_PATH}); foreach (@file_list_to_send_by_ftp) { $interactive and $pbar->set_fraction(0); @@ -3608,7 +3608,7 @@ sub restore_ftp { else { $ftp = Net::FTP->new($hostname, Debug => 0) or return 1 } $ftp->login($username, $userpass); $ftp->cwd($hostpath); - $ftp->binary(); + $ftp->binary; my $wild_card = catalog_to_wildcard($cat_entry); |