"implement" create_transaction() in --env case (rule of least surprise)

(for rpmdrake --env)

1 files changed, 8 insertions, 0 deletions

diff --git a/URPM.pm b/URPM.pm
index 0ef50e4..691fcc7 100644
--- a/URPM.pm
+++ b/URPM.pm
@@ -184,6 +184,14 @@ sub traverse_tag_find {
     $urpm->traverse_tag($tag, [ $name ], $callback);
 }
 
+
+#- this is used when faking a URPM::DB: $urpm can be used as-a $db
+#- (used for urpmi --env)
+sub create_transaction {
+    my ($urpm) = @_;
+    die "Installing is not supported with a fake environment!";
+}
+
 # wrapper around XS functions
 # it handles error cases
 sub _parse_hdlist_or_synthesis {