diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-05 23:21:10 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-05 23:21:10 +0000 |
| commit | 973e9a23561510701896580d05a8393f72c86089 (patch) | |
| tree | ede4aef42e2aa9c637fa8a298e606a024d6b1f34 | |
| parent | 4d07cd7bcaa7cdd09d1407de21fc6959312b44d7 (diff) | |
| download | drakx-973e9a23561510701896580d05a8393f72c86089.tar drakx-973e9a23561510701896580d05a8393f72c86089.tar.gz drakx-973e9a23561510701896580d05a8393f72c86089.tar.bz2 drakx-973e9a23561510701896580d05a8393f72c86089.tar.xz drakx-973e9a23561510701896580d05a8393f72c86089.zip | |
$_ was not localized, fixing (and cleanup)
| -rw-r--r-- | perl-install/printer/main.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm index 7f1a4a44c..a9a45e2c4 100644 --- a/perl-install/printer/main.pm +++ b/perl-install/printer/main.pm @@ -1398,10 +1398,9 @@ sub configure_hpoj { die "Could not open /etc/ptal/$ptaldevice for writing!\n"; # Write file header. - $_ = `date`; - chomp; + my $date = chomp_(`date`); print CONFIG - "# Added $_ by \"printerdrake\".\n" . + "# Added $date by \"printerdrake\".\n" . "\n" . "# The basic format for this file is \"key[+]=value\".\n" . "# If you say \"+=\" instead of \"=\", then the value is appended to any\n" . |