diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-03-23 13:35:57 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-03-23 13:35:57 +0000 |
| commit | 81f94e9378a3a9f6d745ae325cee4adb473d5ed8 (patch) | |
| tree | 88f1cf21cd45387a7d0307b481763db5e087246c | |
| parent | 362df0b00545831f49e494cc693404c7f75763f2 (diff) | |
| download | rpmtools-81f94e9378a3a9f6d745ae325cee4adb473d5ed8.tar rpmtools-81f94e9378a3a9f6d745ae325cee4adb473d5ed8.tar.gz rpmtools-81f94e9378a3a9f6d745ae325cee4adb473d5ed8.tar.bz2 rpmtools-81f94e9378a3a9f6d745ae325cee4adb473d5ed8.tar.xz rpmtools-81f94e9378a3a9f6d745ae325cee4adb473d5ed8.zip | |
workarount hashes subscript error of perl.
| -rw-r--r-- | rpmtools.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rpmtools.pm b/rpmtools.pm index 0194192..691e868 100644 --- a/rpmtools.pm +++ b/rpmtools.pm @@ -453,7 +453,8 @@ sub keep_only_cleaned_provides_files { my ($params) = @_; foreach (keys %{$params->{provides}}) { - /^\// ? $params->{provides}{$_} = undef : delete $params->{provides}{$_}; + delete $params->{provides}{$_}; + /^\// and $params->{provides}{$_} = undef; } #- clean everything else at this point. |