X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcondition.lisp;h=35603bcb6534d343d8de7a916bebd73964b32198;hb=6e02a5455aeef5a4642a2334348544c1f19775ad;hp=dbd3bfcb799616a7d883537a24ade70f665952bd;hpb=4d31006db24db375cdb83a5726d66c524b36689c;p=sbcl.git diff --git a/src/code/condition.lisp b/src/code/condition.lisp index dbd3bfc..35603bc 100644 --- a/src/code/condition.lisp +++ b/src/code/condition.lisp @@ -1245,7 +1245,7 @@ SB-EXT:PACKAGE-LOCKED-ERROR-SYMBOL.")) (lambda (condition stream) (declare (type stream stream)) (format stream - "I/O timeout ~(~A~)ing ~S." + "I/O timeout while doing ~(~A~) on ~S." (io-timeout-direction condition) (stream-error-stream condition)))))