(defun git-blame-cleanup ()
"Remove all blame properties"
- (mapcar 'delete-overlay git-blame-overlays)
+ (mapc 'delete-overlay git-blame-overlays)
(setq git-blame-overlays nil)
(remove-git-blame-text-properties (point-min) (point-max)))
(save-excursion
(goto-char (process-mark proc))
(insert-before-markers str)
- (goto-char 0)
+ (goto-char (point-min))
(unless in-blame-filter
(let ((more t)
(in-blame-filter t))