diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-27 20:50:12 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-27 20:50:12 +0000 |
commit | b0d554c4155060ed665844fdf7b2a08db9bb3356 (patch) | |
tree | d1236029c2ac147b49a2da74bf132c3f56619406 /perl-install/printer/gimp.pm | |
parent | c2b148e1e94892d8d72000ed087b607ae28b5808 (diff) | |
download | drakx-b0d554c4155060ed665844fdf7b2a08db9bb3356.tar drakx-b0d554c4155060ed665844fdf7b2a08db9bb3356.tar.gz drakx-b0d554c4155060ed665844fdf7b2a08db9bb3356.tar.bz2 drakx-b0d554c4155060ed665844fdf7b2a08db9bb3356.tar.xz drakx-b0d554c4155060ed665844fdf7b2a08db9bb3356.zip |
perl_checker adaptations
Diffstat (limited to 'perl-install/printer/gimp.pm')
-rw-r--r-- | perl-install/printer/gimp.pm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/perl-install/printer/gimp.pm b/perl-install/printer/gimp.pm index c6d7a08d0..2655c4340 100644 --- a/perl-install/printer/gimp.pm +++ b/perl-install/printer/gimp.pm @@ -32,8 +32,8 @@ sub configure { "/etc/foomatic/$queue.ppd"); } elsif (-r "$::prefix/usr/share/postscript/ppd/$queue.ppd") { # Check PPD directory of GPR, too - run_program::rooted - ($::prefix, + run_program::rooted( + $::prefix, "ln", "-sf", "/usr/share/postscript/ppd/$queue.ppd", "/etc/foomatic/$queue.ppd"); @@ -89,13 +89,13 @@ sub addcupsremoteto { # Remove server name from queue name $q =~ s/^([^@]*)@.*$/$1/; if (-x "$::prefix/usr/bin/wget") { - eval(run_program::rooted - ($::prefix, "/usr/bin/wget", "-O", + eval(run_program::rooted( + $::prefix, "/usr/bin/wget", "-O", "/etc/foomatic/$queue.ppd", "http://$server:631/printers/$q.ppd")); } else { - eval(run_program::rooted - ($::prefix, "/usr/bin/curl", "-o", + eval(run_program::rooted( + $::prefix, "/usr/bin/curl", "-o", "/etc/foomatic/$queue.ppd", "http://$server:631/printers/$q.ppd")); } @@ -198,7 +198,7 @@ sub makeprinterentry { $configfile = addentry($queue, "Driver: $gimpprintdriver", $configfile); $configfile = removeentry($queue, "Destination:", $configfile); $configfile = addentry($queue, - "Destination: /usr/bin/$spoolers{$printer->{SPOOLER}{print_command}} -P $queue -o raw", $configfile); + sprintf("Destination: /usr/bin/%s -P %s -o raw", $spoolers{$printer->{SPOOLER}{print_command}}, $queue), $configfile); } else { $configfile = removeentry($queue, "PPD-File:", $configfile); $configfile = addentry($queue, "PPD-File: /etc/foomatic/$queue.ppd", $configfile); @@ -206,7 +206,7 @@ sub makeprinterentry { $configfile = addentry($queue, "Driver: ps2", $configfile); $configfile = removeentry($queue, "Destination:", $configfile); $configfile = addentry($queue, - "Destination: /usr/bin/$spoolers{$printer->{SPOOLER}{print_command}} -P $queue", $configfile); + sprintf("Destination: /usr/bin/%s -P %s", $spoolers{$printer->{SPOOLER}{print_command}}, $queue), $configfile); } return $configfile; } |