X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-filter.el;h=5c1b42b684c6101583b8ea3d17b283064f97c9fe;hp=f8889219718d1898f2753af68989942f6c7abf9f;hb=6c268adf10c72433d82ef5b31e4c297e087b0db6;hpb=a90da5167ee52cbf7b1320a4c6a4465b8b10075d diff --git a/lisp/riece-filter.el b/lisp/riece-filter.el index f888921..5c1b42b 100644 --- a/lisp/riece-filter.el +++ b/lisp/riece-filter.el @@ -48,7 +48,7 @@ (riece-decode-coding-string string)) (error (if riece-debug - (message "Error occurred in `%S': %S" function error))))))) + (message "Error in `%S': %S" function error))))))) (defun riece-default-handle-numeric-reply (client-prefix prefix number name string) @@ -74,19 +74,19 @@ (run-hook-with-args-until-success hook prefix string) (error (if riece-debug - (message "Error occurred in `%S': %S" hook error)) + (message "Error in `%S': %S" hook error)) nil)) (if function (condition-case error (funcall function prefix string) (error (if riece-debug - (message "Error occurred in `%S': %S" function error))))) + (message "Error in `%S': %S" function error))))) (condition-case error (run-hook-with-args-until-success after-hook prefix string) (error (if riece-debug - (message "Error occurred in `%S': %S" after-hook error))))))) + (message "Error in `%S': %S" after-hook error))))))) (defun riece-filter (process input) (save-excursion