From f59f29576c158faef6c0b3db7005598d1c49ea46 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 17 Mar 2004 09:50:33 +0000 Subject: use new $ugtk2::wm_icon for x11 icon --- perl-install/standalone/logdrake | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone/logdrake') diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index 64f4f1562..a78c7000e 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -47,13 +47,13 @@ my $isTail = 1 if $isFile; $| = 1 if $isTail; my $h = chomp_(`hostname -s`); +$ugtk2::wm_icon = "logdrake"; my $explain_title = N("Mandrake Tools Logs"); my $my_win = ugtk2->new($isExplain ? $explain_title : N("Logdrake")); unless ($::isEmbedded) { $my_win->{window}->set_border_width(5); #$my_win->{window}->set_default_size(540,460); - $my_win->{window}->set_icon(gtkcreate_pixbuf("logdrake")); } $my_win->{window}->signal_connect(delete_event => \&quit); -- cgit v1.2.1