diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-02-19 15:50:14 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-02-19 15:50:14 +0000 |
| commit | a7e99c1896767cf8dde512cbabc65b0655edc9b2 (patch) | |
| tree | 89599b3735bf1060238e42cda2f69d35fe6011b7 /perl-install | |
| parent | e6e54b56dfdcac3838cbde9699c5a2321afd2917 (diff) | |
| download | drakx-a7e99c1896767cf8dde512cbabc65b0655edc9b2.tar drakx-a7e99c1896767cf8dde512cbabc65b0655edc9b2.tar.gz drakx-a7e99c1896767cf8dde512cbabc65b0655edc9b2.tar.bz2 drakx-a7e99c1896767cf8dde512cbabc65b0655edc9b2.tar.xz drakx-a7e99c1896767cf8dde512cbabc65b0655edc9b2.zip | |
fix embedding
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/scannerdrake | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/standalone/scannerdrake b/perl-install/standalone/scannerdrake index bc14b8b74..5156b1a2c 100755 --- a/perl-install/standalone/scannerdrake +++ b/perl-install/standalone/scannerdrake @@ -19,11 +19,11 @@ # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. use lib qw(/usr/lib/libDrakX); - +use strict; use standalone; #- warning, standalone must be loaded very first, for 'explanations' +use common; use interactive; -use common; use scanner; use handle_configs; use services; @@ -45,6 +45,7 @@ if (!files_exist('/usr/bin/scanimage', 'xsane-gimp')); } if ($::Manual) { manual(); quit() } +$::CCPID and $0 !~ /logdrake/ and kill 'USR2', $::CCPID; my $wait = $in->wait_message(N("Scannerdrake"), N("Searching for configured scanners ...")); my @c = scanner::configured(); @@ -233,7 +234,7 @@ sub tryConfScanner { } sub quit { - $::isEmbedded ? kill('USR1', $::CCPID) : $in->exit(0); + $in->exit(0); } sub mainwindow { |