branch: scratch/el-mock
commit 6d040af21e712b04156a49371b902533935f7258
Author: gracjan <gracjanpo...@gmail.com>
Commit: gracjan <gracjanpo...@gmail.com>

    Skip empty messages
    
    Empty messages appear as empty lines. Remove them.
---
 el-mock.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/el-mock.el b/el-mock.el
index f77d88b5d6..38143ab792 100644
--- a/el-mock.el
+++ b/el-mock.el
@@ -184,9 +184,7 @@ When you adapt Emacs Lisp Mock to a testing framework, wrap 
test method around t
 ;;;; message hack
 (defun mock-suppress-redefinition-message (func)
   "Erase \"ad-handle-definition: `%s' got redefined\" message."
-  (prog1
-      (funcall func)
-    (message "")))
+  (funcall func))
 (put 'mock-syntax-error 'error-conditions '(mock-syntax-error error))
 (put 'mock-syntax-error 'error-message "Mock syntax error")
 

Reply via email to