diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-09-09 11:02:04 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-09-09 11:02:04 +0000 |
| commit | 92a2f3908524627fa0c86c93cfc8f6db9b211eab (patch) | |
| tree | e07b5a4ae015f9ffbf3068e4e583a351a70cf1a5 /perl-install/ugtk.pm | |
| parent | 3a6737ee923c16db0885a0320baeed43b88a201f (diff) | |
| download | drakx-92a2f3908524627fa0c86c93cfc8f6db9b211eab.tar drakx-92a2f3908524627fa0c86c93cfc8f6db9b211eab.tar.gz drakx-92a2f3908524627fa0c86c93cfc8f6db9b211eab.tar.bz2 drakx-92a2f3908524627fa0c86c93cfc8f6db9b211eab.tar.xz drakx-92a2f3908524627fa0c86c93cfc8f6db9b211eab.zip | |
- use variable $::no_ugtk_init in ugtk.pm instead of using $::isInstall
- that way, the X test can be made to work both at install and standalone
Diffstat (limited to 'perl-install/ugtk.pm')
| -rw-r--r-- | perl-install/ugtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm index 4b062a533..5c05a31a7 100644 --- a/perl-install/ugtk.pm +++ b/perl-install/ugtk.pm @@ -15,7 +15,7 @@ $EXPORT_TAGS{all} = [ map { @$_ } values %EXPORT_TAGS ]; use Gtk; -unless ($::isInstall) { +if (!$::no_ugtk_init) { !$ENV{DISPLAY} || system('/usr/X11R6/bin/xtest') and die "Cannot be run in console mode.\n"; Gtk->init; eval { require Gtk::Gdk::Pixbuf; Gtk::Gdk::Pixbuf->init }; |