diff --git a/magit.el b/magit.el index aa506726..287a8df5 100644 --- a/magit.el +++ b/magit.el @@ -3320,14 +3320,15 @@ Prefix arg means justify as well." (magit-need-refresh)))) (defun magit-refresh-wazzup-buffer (head all) + (unless head (setq head "HEAD")) (magit-create-buffer-sections (magit-with-section 'wazzupbuf nil (insert (format "Wazzup, %s\n\n" head)) (let* ((excluded (magit-file-lines ".git/info/wazzup-exclude")) (all-branches (magit-list-interesting-refs)) (branches (if all all-branches - (remove-if (lambda (b) (member (cdr b) excluded)) - all-branches))) + (remove-if (lambda (b) (member (cdr b) excluded)) + all-branches))) (reported (make-hash-table :test #'equal))) (dolist (branch branches) (let* ((name (car branch)) @@ -3349,7 +3350,7 @@ Prefix arg means justify as well." n name (if (member ref excluded) " (normally ignored)" - "")) + "")) 'magit-wash-log "log" (format "--max-count=%s" magit-log-cutoff-length)