From 22d58ed5438fde649c05c3397e577c98e9b8e0c5 Mon Sep 17 00:00:00 2001 From: damien Date: Tue, 30 Oct 2001 20:11:31 +0000 Subject: corrected ref($in) =~ /gtk/ --- perl-install/standalone/drakautoinst | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install/standalone/drakautoinst') diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst index e77ad99d3..985f91492 100755 --- a/perl-install/standalone/drakautoinst +++ b/perl-install/standalone/drakautoinst @@ -88,7 +88,7 @@ my $cfgfile = "$mountdir/auto_inst.cfg"; eval(cat_($cfgfile)); my $o_old = $o; -if (ref($in) =~ /gtk/) { +if (!$::isEmbedded && $in->isa('interactive_gtk')) { require Gtk; init Gtk; require my_gtk; @@ -359,6 +359,9 @@ sub control_buttons { #------------------------------------------------- #- $Log$ +#- Revision 1.13 2001/10/30 20:11:31 damien +#- corrected ref($in) =~ /gtk/ +#- #- Revision 1.12 2001/10/30 17:00:05 damien #- updated #- -- cgit v1.2.1