summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakbackup5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index 918ecb756..66f256827 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -111,7 +111,7 @@ sub debug {
sub save_conf_file {
# perl -ne 'split(":");print "$_[0]:*:$_[2]:$_[3]:::\n";' /etc/passwd > passwd
-# gawk -F":" '{ if ($3 >= 500 ) print "login " $1 " uid = " $3 " rép perso : " $6}' /etc/passwd
+# gawk -F":" '{ if ($3 >= 500 ) print "login " $1 " uid = " $3 " rép perso : " $6}' /etc/passwdgawk -F":" '{ if ($3 >= 500 ) print "login " $1 " uid = " $3 " rép perso : " $6}' /etc/passwd
my @cfg_list = ( "SYS_FILES=@sys_files\n",
"HOME_FILES=@home_files\n",
"OTHER_FILES=@other_files\n",
@@ -427,7 +427,8 @@ sub advanced {
my $box_what_sys = gtkpack(new Gtk::VBox(0,1),
- new Gtk::Pixmap($pix_time_map, $pix_time_mask),
+ new Gtk::CheckButton( "Check me please!" ),
+ new Gtk::Pixmap($pix_time_map, $pix_time_mask),
_("When backup.")
);