From fec21869c2f6387f7c68bfa10d648fb830da6c25 Mon Sep 17 00:00:00 2001 From: Sebastien Dupont Date: Mon, 26 Nov 2001 10:20:46 +0000 Subject: update. --- perl-install/standalone/drakbackup | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl-install') 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.") ); -- cgit v1.2.1