((eq state 'removed)
`((1 ,(line-number-at-pos (point-max)) delete))))))))
-(defun diff-hl-flydiff/overlay-modified (&rest args))
-
;;;###autoload
(define-minor-mode diff-hl-flydiff-mode
"Highlight diffs on-the-fly"
(if diff-hl-flydiff-mode
(progn
(require 'nadvice)
- (advice-add 'diff-hl-update :around
- #'diff-hl-flydiff/update)
- (advice-add 'diff-hl-changes :override
- #'diff-hl-flydiff/changes)
- (advice-add 'diff-hl-overlay-modified :override
- #'diff-hl-flydiff/overlay-modified)
+ (advice-add 'diff-hl-update :around #'diff-hl-flydiff/update)
+ (advice-add 'diff-hl-changes :override #'diff-hl-flydiff/changes)
+ (advice-add 'diff-hl-overlay-modified :override #'ignored)
(remove-hook 'after-change-functions #'diff-hl-edit t)
(setq diff-hl-flydiff-timer
(advice-remove 'diff-hl-update #'diff-hl-flydiff/update)
(advice-remove 'diff-hl-changes #'diff-hl-flydiff/changes)
- (advice-remove 'diff-hl-overlay-modified
- #'diff-hl-flydiff/overlay-modified)
+ (advice-remove 'diff-hl-overlay-modified #'ignored)
(cancel-timer diff-hl-flydiff-timer)
(when diff-hl-mode