diff options
| author | Sebastien Dupont <sdupont@mandriva.com> | 2002-01-15 13:04:49 +0000 |
|---|---|---|
| committer | Sebastien Dupont <sdupont@mandriva.com> | 2002-01-15 13:04:49 +0000 |
| commit | 43966fe2caaaa99900313a1d8cdf2432e32a70fa (patch) | |
| tree | cc5fa616a8fa6b4aacc96a06874ac25a926c03ee /perl-install/standalone | |
| parent | d391a40b454b02bc4e69b002fb2bcc87d28814ae (diff) | |
| download | drakx-backup-do-not-use-43966fe2caaaa99900313a1d8cdf2432e32a70fa.tar drakx-backup-do-not-use-43966fe2caaaa99900313a1d8cdf2432e32a70fa.tar.gz drakx-backup-do-not-use-43966fe2caaaa99900313a1d8cdf2432e32a70fa.tar.bz2 drakx-backup-do-not-use-43966fe2caaaa99900313a1d8cdf2432e32a70fa.tar.xz drakx-backup-do-not-use-43966fe2caaaa99900313a1d8cdf2432e32a70fa.zip | |
new ./drakbackup --show-conf
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakbackup | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 231874fe1..e14eb44cc 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -247,7 +247,9 @@ foreach (@ARGV) { sub show_conf { print "DrakBakckup configuration:\n\n"; - print cat_("$cfg_file"). "\n"; + read_conf_file(); + system_state(); + print $system_state . "\n"; exit(0); } @@ -1611,11 +1613,12 @@ sub system_state { @list_other and $system_state .= "\t\t$_\n" foreach @list_other; $where_hd and $system_state .= _("\n- Save on Hard drive on path : %s\n", $save_path); $where_net_ftp and $system_state .= _("\n- Save on FTP on host : %s\n", $host_name); + $where_net_ftp and $system_state .= _("\t\t user name: $login_user\n\t\t on path: $host_path \n"); $system_state .= _("\n- Options:\n"); $backup_sys or $system_state .= _("\tDo not include System Files\n"); if ($comp_mode) { $system_state .= _("\tBackups use tar and bzip2\n "); } else { $system_state .= _("\tBackups use tar and gzip\n"); } - $system_state .= _("\n- Daemon include :\n"); + $system_state .= _("\n- Daemon ($when_space) include :\n"); $hd_daemon and $system_state .= _("\t-Hard drive.\n"); $cd_daemon and $system_state .= _("\t-CDROM.\n"); $ftp_daemon and $system_state .= _("\t-Network by FTP.\n"); |