diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-04-06 21:54:57 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-04-06 21:54:57 +0000 |
| commit | 3a297c6d6123ecf5c26f4f75573a2efa15a27498 (patch) | |
| tree | 019314cbbf5146138135c3b9576e578647b7f70b /update-ldetect-lst | |
| parent | cff03399966d4802bb09bcdfefeb7182c4aea6f1 (diff) | |
| download | ldetect-lst-3a297c6d6123ecf5c26f4f75573a2efa15a27498.tar ldetect-lst-3a297c6d6123ecf5c26f4f75573a2efa15a27498.tar.gz ldetect-lst-3a297c6d6123ecf5c26f4f75573a2efa15a27498.tar.bz2 ldetect-lst-3a297c6d6123ecf5c26f4f75573a2efa15a27498.tar.xz ldetect-lst-3a297c6d6123ecf5c26f4f75573a2efa15a27498.zip | |
don't use cat(1) in update-ldetect-lst (fix bug #3678)
Diffstat (limited to 'update-ldetect-lst')
| -rw-r--r-- | update-ldetect-lst | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/update-ldetect-lst b/update-ldetect-lst index d0921017..8b351fc8 100644 --- a/update-ldetect-lst +++ b/update-ldetect-lst @@ -11,5 +11,9 @@ foreach (@files) { my $d = "$dir/$_.d"; -d $d or next; my @l = sort glob("$d/*.lst") or next; - system("cat " . join(" ", @l) . " > $dir/$_"); + open(my $OUT, " > $dir/$_"); + foreach (@l) { + open(my $IN, $_) or next; + print $OUT $_ foreach <$IN>; + } } |