Print a message when we start each guest.

diff --git a/run-transfer-tests.pl b/run-transfer-tests.pl
index b119640..8ca2894 100755 (executable)
--- a/run-transfer-tests.pl
+++ b/run-transfer-tests.pl
@@ -184,6 +184,8 @@ if (@guests == 0) {
 
 my $guest;
 foreach $guest (@guests) {
+    print "opening: $guest\n";
+
     my $dom = $vmm->get_domain_by_name ($guest)
         or die "$progname: $guest: guest not found\n";
     my $domxml = $dom->get_xml_description ();