diff options
author | Olivier Blin <oblin@mandriva.com> | 2008-03-21 19:56:53 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2008-03-21 19:56:53 +0000 |
commit | 419bdaa161afd19ae93a1008ece1cb0a3e7a12a5 (patch) | |
tree | ffae287e99644c066ab071b37e4edc8a8fa59be1 /perl-install/standalone/drakupdate_fstab | |
parent | 1b4d5ee4af57583aab5db60b617ecbc6c303244b (diff) | |
download | drakx-backup-do-not-use-419bdaa161afd19ae93a1008ece1cb0a3e7a12a5.tar drakx-backup-do-not-use-419bdaa161afd19ae93a1008ece1cb0a3e7a12a5.tar.gz drakx-backup-do-not-use-419bdaa161afd19ae93a1008ece1cb0a3e7a12a5.tar.bz2 drakx-backup-do-not-use-419bdaa161afd19ae93a1008ece1cb0a3e7a12a5.tar.xz drakx-backup-do-not-use-419bdaa161afd19ae93a1008ece1cb0a3e7a12a5.zip |
drakupdate_fstab: do not print added/removed mountpoints with --auto
(when run from harddrake, like in Mandriva One), but add a --verbose
option instead
Diffstat (limited to 'perl-install/standalone/drakupdate_fstab')
-rwxr-xr-x | perl-install/standalone/drakupdate_fstab | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/standalone/drakupdate_fstab b/perl-install/standalone/drakupdate_fstab index 22df9e116..051c706d6 100755 --- a/perl-install/standalone/drakupdate_fstab +++ b/perl-install/standalone/drakupdate_fstab @@ -31,12 +31,13 @@ $::isStandalone = 1; #- not using standalone.pm which generates too many logs fo log::l("drakupdate_fstab called with @ARGV\n"); -my ($debug, $removed); +my ($debug, $verbose, $removed); my %args = ( '--auto' => \$::auto, '--debug' => \$debug, '--test' => \$::testing, + '--verbose' => \$verbose, ); each_index { @@ -50,7 +51,7 @@ each_index { my ($raw_action, $device_name) = @ARGV; my ($action) = $raw_action =~ /^--(add|del)/; -@ARGV == 2 && $action or die "usage: drakupdate_fstab [--test] [--auto] [--add | --del] <device>\n"; +@ARGV == 2 && $action or die "usage: drakupdate_fstab [--test] [--verbose] [--auto] [--add | --del] <device>\n"; main($action, $device_name); @@ -145,7 +146,7 @@ sub configure_part { system("mount $part->{mntpoint}") if !$::testing && ($device_name =~ /^fd\d+/ || $is_hd); } - if ($::auto) { + if ($verbose) { print $part->{mntpoint}, " user\n"; } } else { @@ -157,7 +158,7 @@ sub configure_part { my ($s) = fs::prepare_write_fstab($fstab_, '', 'keep_smb_credentials'); output($fstab_file, $s); - if ($::auto) { + if ($verbose) { print "$_->{mntpoint}\n" foreach @$existing_fstab_entries; } } |