emacs - 如何在 Emacs 中显示更改的行？

Question

默认情况下，某些文本编辑器可以显示更改的行。但是在 Emacs 中，如何呢？

Answer 1

次要模式 highlight-changes-mode显示文本更改。

添加:
我为 highlight-changes-mode 写了一些边缘支持代码.

(eval-after-load "hilit-chg"
  '(progn
     (defvar highlight-fringe-mark 'filled-square
       "The fringe bitmap name marked at changed line.
Should be selected from `fringe-bitmaps'.")

     (defadvice hilit-chg-make-ov (after hilit-chg-add-fringe activate)
       (mapc (lambda (ov)
           (if (overlay-get ov 'hilit-chg)
           (let ((fringe-anchor (make-string 1 ?x)))
             (put-text-property 0 1 'display
                    (list 'left-fringe highlight-fringe-mark)
                    fringe-anchor)
             (overlay-put ov 'before-string fringe-anchor))
         ))
         (overlays-at (ad-get-arg 1))))))

(来源: gyazo.com)

添加:
要删除节省时间的亮点，请尝试:

(add-hook 'after-save-hook
          (lambda ()
            (when highlight-changes-mode
              (save-restriction
                (widen)
                (highlight-changes-remove-highlight (point-min) (point-max))))))