summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-08-13 01:37:25 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-08-13 01:37:25 +0000
commitccb354df46579b55cfe8521cf30fbf007d69f933 (patch)
tree21b89b2e56f281014cb5a68afc991b22dd194449 /perl-install
parent0ee07ece875988099af5c8e58112b20aab48f3c5 (diff)
downloaddrakx-ccb354df46579b55cfe8521cf30fbf007d69f933.tar
drakx-ccb354df46579b55cfe8521cf30fbf007d69f933.tar.gz
drakx-ccb354df46579b55cfe8521cf30fbf007d69f933.tar.bz2
drakx-ccb354df46579b55cfe8521cf30fbf007d69f933.tar.xz
drakx-ccb354df46579b55cfe8521cf30fbf007d69f933.zip
Concision, good (says perl_checker)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/pkgs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 77540fa96..17e2ccb8e 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -449,7 +449,7 @@ sub psUsingHdlist {
$synth = $o_fhdlist;
$synth =~ s/hdlist/synthesis.hdlist/ or $synth = undef;
}
- $synth = "media/media_info/synthesis.$hdlist" unless $synth;
+ $synth ||= "media/media_info/synthesis.$hdlist";
install_any::getAndSaveFile($synth, $newsf);
$m->{synthesis_hdlist_size} = -s $newsf; #- keep track of size for post-check.
-s $newsf > 0 or unlink $newsf;