branch: elpa/magit commit 1836c8d8413c743606402646179601471a0e499d Author: Jonas Bernoulli <jo...@bernoul.li> Commit: Jonas Bernoulli <jo...@bernoul.li>
Use magit-msg more --- lisp/magit-blame.el | 15 +++++++-------- lisp/magit-process.el | 5 ++--- 2 files changed, 9 insertions(+), 11 deletions(-) diff --git a/lisp/magit-blame.el b/lisp/magit-blame.el index 629d9811aff..42e8f28b350 100644 --- a/lisp/magit-blame.el +++ b/lisp/magit-blame.el @@ -742,14 +742,13 @@ modes is toggled, then this mode also gets toggled automatically. (defun magit-blame-maybe-show-message () (when (magit-blame--style-get 'show-message) - (let ((message-log-max 0)) - (if-let ((msg (cdr (assoc "summary" - (gethash (oref (magit-current-blame-chunk) - orig-rev) - magit-blame-cache))))) - (progn (set-text-properties 0 (length msg) nil msg) - (message "%S" msg)) - (message "Commit data not available yet. Still blaming."))))) + (if-let ((msg (cdr (assoc "summary" + (gethash (oref (magit-current-blame-chunk) + orig-rev) + magit-blame-cache))))) + (progn (set-text-properties 0 (length msg) nil msg) + (magit-msg "%S" msg)) + (magit-msg "Commit data not available yet. Still blaming.")))) ;;; Commands diff --git a/lisp/magit-process.el b/lisp/magit-process.el index 91c90def606..e724bbd9b0b 100644 --- a/lisp/magit-process.el +++ b/lisp/magit-process.el @@ -539,11 +539,10 @@ current when this function was called (if it is a Magit buffer and still alive), as well as the respective Magit status buffer. See `magit-start-process' for more information." - (let ((message-log-max nil)) - (message "Running %s %s" (magit-git-executable) + (magit-msg "Running %s %s" (magit-git-executable) (let ((m (string-join (flatten-tree args) " "))) (remove-list-of-text-properties 0 (length m) '(face) m) - m))) + m)) (magit-start-git nil args)) (defun magit-run-git-with-editor (&rest args)