Fix error string.

[ira/wip.git] / testsuite / lib / smbclient.exp

diff --git a/testsuite/lib/smbclient.exp b/testsuite/lib/smbclient.exp
index 3fd920e07f53836a4ceaa1eb70401543131393a1..dc55d72139cbfdd7bc24077a446577a602458de0 100644 (file)
--- a/testsuite/lib/smbclient.exp
+++ b/testsuite/lib/smbclient.exp
@@ -46,7 +46,7 @@ proc do_smbclient { args } {
     expect {
        $smb_prompt     {}
        timeout         { perror "timed out $description"; return -1}
-       eof             { perror "end of file description"; return -1 }
+       eof             { perror "end of file $description"; return -1 }
     }
 
     verbose $expect_out(buffer)