From 2e6d60e619c016a2d7cf3a0bfe9c0b82e290f8c8 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Thu, 3 Nov 2005 14:47:09 +0000
Subject: Remove more MDK::Common vestigia

---
 urpm/util.pm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'urpm/util.pm')

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__
-- 
cgit v1.2.1