summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/printer.pm16
1 files changed, 12 insertions, 4 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index 65dce935c..3ab281cc4 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -1781,7 +1781,7 @@ sub makestarofficeprinterentry {
# Make an entry in the "[ports]" section
$configfile = removeentry("ports", "$queue=", $configfile);
$configfile = addentry("ports",
- "$queue=lpr -P $queue",
+ "$queue=/usr/bin/lpr -P $queue",
$configfile);
# Make printer's section
$configfile = addsection("$queue,PostScript,$queue", $configfile);
@@ -1846,7 +1846,7 @@ sub makeopenofficeprinterentry {
# "Command" line
$configfile = removeentry($queue, "Command=", $configfile);
$configfile = addentry($queue,
- "Command=lpr -P $queue",
+ "Command=/usr/bin/lpr -P $queue",
$configfile);
# "Comment" line
$configfile = removeentry($queue, "Comment=", $configfile);
@@ -1927,7 +1927,11 @@ sub findsofficeconfigfile {
my @configfilenames = ("/usr/lib/*/share/xp3/Xpdefaults",
"/usr/local/lib/*/share/xp3/Xpdefaults",
"/usr/local/*/share/xp3/Xpdefaults",
- "/opt/*/share/xp3/Xpdefaults");
+ "/opt/*/share/xp3/Xpdefaults",
+ "/*/share/xp3/Xpdefaults",
+ "/*/*/share/xp3/Xpdefaults",
+ "/*/*/*/share/xp3/Xpdefaults",
+ "/*/*/*/*/share/xp3/Xpdefaults");
my $configfilename = "";
for $configfilename (@configfilenames) {
local *F;
@@ -1945,7 +1949,11 @@ sub findopenofficeconfigfile {
("/usr/lib/*/share/psprint/psprint.conf",
"/usr/local/lib/*/share/psprint/psprint.conf",
"/usr/local/*/share/psprint/psprint.conf",
- "/opt/*/share/psprint/psprint.conf");
+ "/opt/*/share/psprint/psprint.conf",
+ "/*/share/psprint/psprint.conf",
+ "/*/*/share/psprint/psprint.conf",
+ "/*/*/*/share/psprint/psprint.conf",
+ "/*/*/*/*/share/psprint/psprint.conf");
my $configfilename = "";
for $configfilename (@configfilenames) {
local *F;