summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-04 12:46:47 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-04 12:46:47 +0000
commit2464b52cfafd5bccf6cc35137748e4f008709d74 (patch)
treea2f1906e660f73b00e04c82e07c70d1af4d73959 /perl-install
parenta8d9723bcb77c8009fc02c4d4174bbbd552a3c4a (diff)
downloaddrakx-2464b52cfafd5bccf6cc35137748e4f008709d74.tar
drakx-2464b52cfafd5bccf6cc35137748e4f008709d74.tar.gz
drakx-2464b52cfafd5bccf6cc35137748e4f008709d74.tar.bz2
drakx-2464b52cfafd5bccf6cc35137748e4f008709d74.tar.xz
drakx-2464b52cfafd5bccf6cc35137748e4f008709d74.zip
make things more clear
(and protect us from someone using $o for something not "interactive" related in its prog ;)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 112a7e501..0dd0e0fa8 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -936,7 +936,7 @@ sub ask_browse_tree_info {
gtkpack__($box2, gtknew(($::isInstall ? 'Install_Button' : 'Button'), text => N("Help"), clicked => sub {
# will be a little small in standalone mode:
- if (defined $::o) {
+ if ($::isInstall) {
$::o->ask_warn(N("Help"), $common->{interactive_help}->());
} else {
ask_warn(N("Help"), $common->{interactive_help}->());