summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-11 06:37:14 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-11 06:37:14 +0000
commita510a01b688f3a7af5f3abf41748f2f9a096ca44 (patch)
tree42f170785f6b0786bf9bed23f967ae4477159631 /perl-install/standalone.pm
parent05536818913b6837b3395bfd13b1d52584143dd1 (diff)
downloaddrakx-a510a01b688f3a7af5f3abf41748f2f9a096ca44.tar
drakx-a510a01b688f3a7af5f3abf41748f2f9a096ca44.tar.gz
drakx-a510a01b688f3a7af5f3abf41748f2f9a096ca44.tar.bz2
drakx-a510a01b688f3a7af5f3abf41748f2f9a096ca44.tar.xz
drakx-a510a01b688f3a7af5f3abf41748f2f9a096ca44.zip
perl_checker compliance
Diffstat (limited to 'perl-install/standalone.pm')
-rw-r--r--perl-install/standalone.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index fc3f82f24..0a24c4cf5 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -172,14 +172,14 @@ $SIG{SEGV} = sub { my $progname = $0; $progname =~ s|.*/||; exec("drakbug --inci
sub import {
($standalone_name = $0) =~ s|.*/||;
- c::openlog($standalone_name."[$$]");
+ c::openlog($standalone_name . "[$$]");
explanations('### Program is starting ###');
eval "*common::$_ = *$_" foreach @common_functs;
foreach my $f (@builtin_functs) {
- eval "*$_"."::$f = *$f" foreach @drakx_modules;
- eval "*".caller()."::$f = *$f";
+ eval "*$_" . "::$f = *$f" foreach @drakx_modules;
+ eval "*" . caller() . "::$f = *$f";
}
}