summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-11 05:13:36 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-11 05:13:36 +0000
commit32557805bb32dadb2139e77ab00307927d50e734 (patch)
treeb26c70aeb56be99df580f7bc4f9157f445462217 /perl-install
parent5e9ff63780a1ff7ef558f2cd22711a05cb777c49 (diff)
downloaddrakx-backup-do-not-use-32557805bb32dadb2139e77ab00307927d50e734.tar
drakx-backup-do-not-use-32557805bb32dadb2139e77ab00307927d50e734.tar.gz
drakx-backup-do-not-use-32557805bb32dadb2139e77ab00307927d50e734.tar.bz2
drakx-backup-do-not-use-32557805bb32dadb2139e77ab00307927d50e734.tar.xz
drakx-backup-do-not-use-32557805bb32dadb2139e77ab00307927d50e734.zip
(Dialog) enable checking call signature
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakroam2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam
index 1f1ccc3d4..ad6b34ed1 100755
--- a/perl-install/standalone/drakroam
+++ b/perl-install/standalone/drakroam
@@ -325,7 +325,7 @@ sub Disconnect {
sub Dialog {
# read file
-my $FilePointer = pop @_;
+ my ($FilePointer) = @_;
my $content = join('', cat_($FilePointer));
# dump into a dialog
my $AboutWindow = Gtk2::Dialog->new("Drakroam Info", $w->{window},