aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/vc
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/vc')
-rw-r--r--lisp/vc/diff-mode.el7
-rw-r--r--lisp/vc/log-edit.el2
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el
index cec4fb24616..c16c2460e75 100644
--- a/lisp/vc/diff-mode.el
+++ b/lisp/vc/diff-mode.el
@@ -1829,10 +1829,13 @@ For use in `add-log-current-defun-function'."
1829 (eval-and-compile (require 'smerge-mode)) 1829 (eval-and-compile (require 'smerge-mode))
1830 (save-excursion 1830 (save-excursion
1831 (diff-beginning-of-hunk 'try-harder) 1831 (diff-beginning-of-hunk 'try-harder)
1832 (let* ((style (diff-hunk-style)) ;Skips the hunk header as well. 1832 (let* ((start (point))
1833 (style (diff-hunk-style)) ;Skips the hunk header as well.
1833 (beg (point)) 1834 (beg (point))
1834 (props '((diff-mode . fine) (face diff-refine-change))) 1835 (props '((diff-mode . fine) (face diff-refine-change)))
1835 (end (progn (diff-end-of-hunk) (point)))) 1836 ;; Be careful to go back to `start' so diff-end-of-hunk gets
1837 ;; to read the hunk header's line info.
1838 (end (progn (goto-char start) (diff-end-of-hunk) (point))))
1836 1839
1837 (remove-overlays beg end 'diff-mode 'fine) 1840 (remove-overlays beg end 'diff-mode 'fine)
1838 1841
diff --git a/lisp/vc/log-edit.el b/lisp/vc/log-edit.el
index 2bce58f50f2..c7f37c50011 100644
--- a/lisp/vc/log-edit.el
+++ b/lisp/vc/log-edit.el
@@ -774,7 +774,7 @@ where LOGBUFFER is the name of the ChangeLog buffer, and each
774 (setq pattern (file-name-nondirectory file))) 774 (setq pattern (file-name-nondirectory file)))
775 775
776 (setq pattern (concat "\\(^\\|[^[:alnum:]]\\)" 776 (setq pattern (concat "\\(^\\|[^[:alnum:]]\\)"
777 pattern 777 (regexp-quote pattern)
778 "\\($\\|[^[:alnum:]]\\)")) 778 "\\($\\|[^[:alnum:]]\\)"))
779 779
780 (let (texts 780 (let (texts