diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-11-03 14:47:09 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-11-03 14:47:09 +0000 |
| commit | 2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8 (patch) | |
| tree | 49a7374c297c3e67b29efb6121b714f3c6f69086 /urpm/util.pm | |
| parent | b3882cb0b3bb23a164995070212d3bcb8888fe8b (diff) | |
| download | urpmi-2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8.tar urpmi-2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8.tar.gz urpmi-2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8.tar.bz2 urpmi-2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8.tar.xz urpmi-2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8.zip | |
Remove more MDK::Common vestigia
Diffstat (limited to 'urpm/util.pm')
| -rw-r--r-- | urpm/util.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/urpm/util.pm b/urpm/util.pm index 0423a094..008f2e89 100644 --- a/urpm/util.pm +++ b/urpm/util.pm @@ -7,6 +7,7 @@ our @EXPORT = qw(quotespace unquotespace remove_internal_name reduce_pathname offset_pathname md5sum untaint + difference2 ); #- quoting/unquoting a string that may be containing space chars. @@ -94,6 +95,8 @@ sub move { rename($file, $dest) or !system("/bin/mv", "-f", $file, $dest); } +sub difference2 { my %l; @l{@{$_[1]}} = (); grep { !exists $l{$_} } @{$_[0]} } + 1; __END__ |