diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-29 19:42:22 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-29 19:42:22 +0000 |
commit | 7173354fa6334e1f006af3eda4963a60ad42615d (patch) | |
tree | 145efbb6126c5aa848cd18987990923c29a68b0d /perl-install | |
parent | 6e23dc5807f4251b35ef37550b3ef58b88c6dc10 (diff) | |
download | drakx-backup-do-not-use-7173354fa6334e1f006af3eda4963a60ad42615d.tar drakx-backup-do-not-use-7173354fa6334e1f006af3eda4963a60ad42615d.tar.gz drakx-backup-do-not-use-7173354fa6334e1f006af3eda4963a60ad42615d.tar.bz2 drakx-backup-do-not-use-7173354fa6334e1f006af3eda4963a60ad42615d.tar.xz drakx-backup-do-not-use-7173354fa6334e1f006af3eda4963a60ad42615d.zip |
make perl_checker happy
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/printer.pm | 2 | ||||
-rwxr-xr-x | perl-install/standalone/XFdrake | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm index c655e3a8a..d3d54c478 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -1467,7 +1467,7 @@ sub configure_hpoj { die "unable to open /usr/sbin/ptal-init"; }; my @ptalinitfunctions; # subroutine definitions in /usr/sbin/ptal-init - while(<PTALINIT>) { + while (<PTALINIT>) { if (m!sub main!) { last; } elsif (m!^[^\#]!) { diff --git a/perl-install/standalone/XFdrake b/perl-install/standalone/XFdrake index 635fd0324..eca0f6cad 100755 --- a/perl-install/standalone/XFdrake +++ b/perl-install/standalone/XFdrake @@ -25,8 +25,10 @@ use Xconfig::main; use Xconfig::xfree; use Xconfig::default; use interactive; +use any; use c; + $::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /--embedded (\w+) (\w+)/; local $_ = join '', @ARGV; |