--- foxridge-archiver/unarchiver.pl	2005/03/23 12:12:08	1.4
+++ foxridge-archiver/unarchiver.pl	2007/03/21 14:21:01	1.6
@@ -18,7 +18,7 @@ $|=1;
 #
 
 # program version
-my $version = "0.3 (20.1.2005)";
+my $version = "0.3.2 (21.3.2007)";
 
 # read command line parameters
 my $args = parseargs;
@@ -196,6 +196,7 @@ sub run_retrieve {
 	# destination dir is mount point
 	$archparent = $archmount;
     }
+    logger("INFO", "looking for archives in $archmount...");
 
     print LOG "START unarchive $version on ", scalar localtime, "\n";
     my $archcmd = $archprog;
@@ -204,6 +205,8 @@ sub run_retrieve {
     $archcmd .= " '$archmount/'"; # archive mount point
     $archcmd .= " '$archparent/'"; # destination dir name
 
+    logger('INFO', "querying TSM server for $archmount, please wait...");
+
     my $archcnt = 0;
     my $numfiles = 0;
     print LOG "CMD: $archcmd\n";