summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/logdrake
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-02-17 07:24:38 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-02-17 07:24:38 +0000
commit210d6d78b10d5b22023ba2df52726a66b1dc25bd (patch)
treedc08f155c4047662362d7dbf13419b8672444827 /perl-install/standalone/logdrake
parentbadae8cdf23b812b3584eff31cfc6359103c31f2 (diff)
downloaddrakx-backup-do-not-use-210d6d78b10d5b22023ba2df52726a66b1dc25bd.tar
drakx-backup-do-not-use-210d6d78b10d5b22023ba2df52726a66b1dc25bd.tar.gz
drakx-backup-do-not-use-210d6d78b10d5b22023ba2df52726a66b1dc25bd.tar.bz2
drakx-backup-do-not-use-210d6d78b10d5b22023ba2df52726a66b1dc25bd.tar.xz
drakx-backup-do-not-use-210d6d78b10d5b22023ba2df52726a66b1dc25bd.zip
this was just tested before
Diffstat (limited to 'perl-install/standalone/logdrake')
-rwxr-xr-xperl-install/standalone/logdrake4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index f04cb992f..709eda546 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -55,7 +55,7 @@ unless ($::isEmbedded) {
$my_win->{window}->signal_connect(delete_event => \&quit);
my $cal = gtkset_sensitive(new Gtk2::Calendar(), 0);
-my (undef, undef, undef, $mday) = localtime(time());
+my $mday = (localtime(time()))[3];
$cal->select_day($mday);
my @months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
my $cal_mode = 0;
@@ -246,7 +246,7 @@ sub parse_file {
$pbar = new Gtk2::ProgressBar()
)
);
- $win_pb->set_transient_for($my_win->{rwindow}) unless $::isEmbedded;
+ $win_pb->set_transient_for($my_win->{rwindow});
$win_pb->set_modal(1);
$win_pb->set_position('center');
$win_pb->realize();