summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/printer.pm2
-rwxr-xr-xperl-install/standalone/XFdrake2
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;