2 files changed, 9 insertions, 0 deletions
diff --git a/NEWS b/NEWS
index 178e8a7..b562d5d 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- add URPM::traverse_tag_find() for urpme --env
+
 Version 3.39 - 27 February 2012
 
 - do not add FILENAME_TAG to hdlist anymore (unused since mdv2008)
diff --git a/URPM.pm b/URPM.pm
index 523902c..c83e122 100644
--- a/URPM.pm
+++ b/URPM.pm
@@ -177,6 +177,13 @@ sub traverse_tag {
     $count;
 }
 
+#- this is used when faking a URPM::DB: $urpm can be used as-a $db
+#- (used for urpmi --env)
+sub traverse_tag_find {
+    my ($urpm, $tag, $name, $callback) = @_;
+    $urpm->traverse_tag($tag, [ $name ], $callback);
+}
+
 # wrapper around XS functions
 # it handles error cases
 sub _parse_hdlist_or_synthesis {