diff options
author | Till Kamppeter <tkamppeter@mandriva.com> | 2004-03-01 13:05:43 +0000 |
---|---|---|
committer | Till Kamppeter <tkamppeter@mandriva.com> | 2004-03-01 13:05:43 +0000 |
commit | bb8ff5a0723124de9ed8d08bb747352afdd766d7 (patch) | |
tree | 423fed8634ec90e830acf320da2b0e91969c2a74 /perl-install | |
parent | 65137633a818e105c7ab9daf7ff65a762486d339 (diff) | |
download | drakx-backup-do-not-use-bb8ff5a0723124de9ed8d08bb747352afdd766d7.tar drakx-backup-do-not-use-bb8ff5a0723124de9ed8d08bb747352afdd766d7.tar.gz drakx-backup-do-not-use-bb8ff5a0723124de9ed8d08bb747352afdd766d7.tar.bz2 drakx-backup-do-not-use-bb8ff5a0723124de9ed8d08bb747352afdd766d7.tar.xz drakx-backup-do-not-use-bb8ff5a0723124de9ed8d08bb747352afdd766d7.zip |
Fixed bug of installer crashing when an HP multi-function device is detected and set up.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/printer/main.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm index c6209b98e..bf09563af 100644 --- a/perl-install/printer/main.pm +++ b/perl-install/printer/main.pm @@ -2139,7 +2139,10 @@ sub configure_hpoj { while (<PTALINIT>) { if (m!sub main!) { last; - } elsif (m!^[^\#]!) { + } elsif ((m!^[^\#]!) && !(m!^\s*exec\b!)){ + # Comment lines and the "exec" line (probably obsolete + # Red Hat workaround) are skipped. + # Make the subroutines also working during installation if ($::isInstall) { s!\$::prefix!\$hpoj_prefix!g; |