From 0ca3f83c67b6b4debdb41022d4fa4dc6b9ece1a7 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 26 Jan 2009 14:46:41 +0000 Subject: $w is unused --- perl-install/standalone/drakdvb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone/drakdvb') diff --git a/perl-install/standalone/drakdvb b/perl-install/standalone/drakdvb index 4e684c72e..9f2129604 100755 --- a/perl-install/standalone/drakdvb +++ b/perl-install/standalone/drakdvb @@ -79,7 +79,7 @@ sub detect_channels() { if ($pid = fork()) { gtkadd($wait->{window}, gtkpack($wait->create_box_with_title(N("Detecting DVB channels, this will take a few minutes")), - my $w = gtknew('Button', text => N("Cancel"), clicked => \&exitapp), + gtknew('Button', text => N("Cancel"), clicked => \&exitapp), ) ); $wait->main; -- cgit v1.2.1