summaryrefslogtreecommitdiffstats
path: root/perl-install/printerdrake.pm
diff options
context:
space:
mode:
authorMystery Man <unknown@mandriva.org>2003-08-20 07:37:27 +0000
committerMystery Man <unknown@mandriva.org>2003-08-20 07:37:27 +0000
commit7f2ac73888b8ef372ea597049981b27e7d810ac2 (patch)
tree354132889b63bbe5f446cb82869b3c3367135a80 /perl-install/printerdrake.pm
parent327bd24f8e4291bd1882de1990dd7339f781a9cb (diff)
downloaddrakx-backup-do-not-use-topic/MDKC_1_0.tar
drakx-backup-do-not-use-topic/MDKC_1_0.tar.gz
drakx-backup-do-not-use-topic/MDKC_1_0.tar.bz2
drakx-backup-do-not-use-topic/MDKC_1_0.tar.xz
drakx-backup-do-not-use-topic/MDKC_1_0.zip
This commit was manufactured by cvs2svn to create branch 'MDKC_1_0'.topic/MDKC_1_0
Diffstat (limited to 'perl-install/printerdrake.pm')
-rw-r--r--perl-install/printerdrake.pm13
1 files changed, 8 insertions, 5 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index d94d0886b..29bbfd1f5 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -13,6 +13,9 @@ use printer;
1;
+#- Define library name where plugins and libraries are
+my $lib = arch() =~ /x86_64/ ? "lib64" : "lib";
+
sub choose_printer_type {
my ($printer, $in) = @_;
$in->set_help('configurePrinterConnected') if $::isInstall;
@@ -1353,7 +1356,7 @@ sub setup_common {
/usr/bin/xscanimage
/usr/bin/xsane
/etc/sane.d/dll.conf
- /usr/lib/libsane-hpoj.so.1),
+ /usr/$lib/libsane-hpoj.so.1),
(printer::files_exist
('/usr/bin/gimp') ?
'/usr/bin/xsane-gimp' :
@@ -2747,7 +2750,7 @@ sub install_spooler {
my $w = $in->wait_message(_("Printerdrake"),
_("Checking installed software..."));
if ((!$::testing) &&
- (!printer::files_exist((qw(/usr/lib/cups/cgi-bin/printers.cgi
+ (!printer::files_exist((qw(/usr/$lib/cups/cgi-bin/printers.cgi
/sbin/ifconfig
/usr/bin/xpp),
($::expert ?
@@ -2793,7 +2796,7 @@ sub install_spooler {
_("Checking installed software..."));
# "lpr" conflicts with "LPRng", remove "LPRng"
if ((!$::testing) &&
- (printer::files_exist((qw(/usr/lib/filters/lpf))))) {
+ (printer::files_exist((qw(/usr/$lib/filters/lpf))))) {
my $w = $in->wait_message(_("Printerdrake"),
_("Removing LPRng..."));
$in->do_pkgs->remove_nodeps('LPRng');
@@ -2838,7 +2841,7 @@ sub install_spooler {
$in->do_pkgs->remove_nodeps('lpr');
}
if ((!$::testing) &&
- (!printer::files_exist((qw(/usr/lib/filters/lpf
+ (!printer::files_exist((qw(/usr/$lib/filters/lpf
/usr/sbin/lpd
/sbin/ifconfig
/usr/bin/gpr
@@ -3002,7 +3005,7 @@ sub main {
/usr/bin/scli
),
(printer::files_exist("/usr/bin/gimp") ?
- "/usr/lib/gimp/1.2/plug-ins/print" : ())
+ "/usr/$lib/gimp/1.2/plug-ins/print" : ())
)))) {
$in->do_pkgs->install('foomatic','printer-utils','printer-testpages','nmap','scli',
if_($in->do_pkgs->is_installed('gimp'), 'gimpprint'));