X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=client-src%2Famdump_client.pl;fp=client-src%2Famdump_client.pl;h=f0fd0bbdd951c4602ff30f1210f6b062e47f6097;hb=109540caa4e37a3663b3dcfb9a205b9609e3f561;hp=560747c7d82e51f39c83506244cf6d425e323f39;hpb=4c9eba1feb11adf189bceb4001c425e641f0b56a;p=debian%2Famanda

diff --git a/client-src/amdump_client.pl b/client-src/amdump_client.pl
index 560747c..f0fd0bb 100644
--- a/client-src/amdump_client.pl
+++ b/client-src/amdump_client.pl
@@ -1,5 +1,5 @@
 #! @PERL@
-# Copyright (c) 2010 Zmanda Inc.  All Rights Reserved.
+# Copyright (c) 2010-2012 Zmanda Inc.  All Rights Reserved.
 #
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the GNU General Public License version 2 as published
@@ -101,7 +101,7 @@ if ($cmd eq 'list') {
 		    debug("send: DISK " . Amanda::Util::quote_string($diskname));
 		    print {$amservice_in} "DISK " . Amanda::Util::quote_string($diskname) . "\n";
 		    my $a = <$amservice_out>;
-		    print if ($a != /^DISK /)
+		    print if ($a !~ /^DISK /)
 		}
 	    }
 	}