From 9804b03db290d27eb4d3485a5fb83b683ee557d6 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 4 Feb 2004 23:25:36 +0000 Subject: $::noBorder is deprecated (it was the same as !$::isInstall) --- perl-install/standalone.pm | 1 - perl-install/standalone/harddrake2 | 1 - 2 files changed, 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index f86e49fd5..7a20f4487 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -12,7 +12,6 @@ if ($::isInstall) { log::l('backtrace: ' . backtrace()); } $::isStandalone = 1; -$::noBorder = 1; $ENV{SHARE_PATH} ||= "/usr/share"; diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 9c9069e48..ab5de9276 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -137,7 +137,6 @@ gtkflush(); # Build the gui add_icon_path('/usr/share/pixmaps/harddrake2/'); -$::noBorder = 1; $w = ugtk2->new(N("Harddrake2 version %s", $harddrake::data::version)); local $::main_window; # fake diagnostics pragma my ($menubar, $factory, $opt_menu, $help_menu); -- cgit v1.2.1