summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakroam16
1 files changed, 8 insertions, 8 deletions
diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam
index ad6b34ed1..e256124fe 100755
--- a/perl-install/standalone/drakroam
+++ b/perl-install/standalone/drakroam
@@ -326,14 +326,14 @@ sub Disconnect {
sub Dialog {
# read file
my ($FilePointer) = @_;
-my $content = join('', cat_($FilePointer));
-# dump into a dialog
-my $AboutWindow = Gtk2::Dialog->new("Drakroam Info", $w->{window},
- 'destroy-with-parent',
- 'gtk-ok' => 'none');
-$AboutWindow->vbox->add(create_scrolled_window(Gtk2::Label->new($content)));
-$AboutWindow->signal_connect(response => sub { $_[0]->destroy });
-$AboutWindow->show_all;
+ my $content = join('', cat_($FilePointer));
+ # dump into a dialog
+ my $AboutWindow = Gtk2::Dialog->new("Drakroam Info", $w->{window},
+ 'destroy-with-parent',
+ 'gtk-ok' => 'none');
+ $AboutWindow->vbox->add(create_scrolled_window(Gtk2::Label->new($content)));
+ $AboutWindow->signal_connect(response => sub { $_[0]->destroy });
+ $AboutWindow->show_all;
}
# start GUI