GNU bug report logs -
#12584
refine diff-hunk broken for unified diff with "\ No newline at end of file" meta text
Previous Next
Reported by: Le Wang <l26wang <at> gmail.com>
Date: Sat, 6 Oct 2012 15:11:02 UTC
Severity: normal
Done: Stefan Monnier <monnier <at> iro.umontreal.ca>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
Your bug report
#12584: refine diff-hunk broken for unified diff with "\ No newline at end of file" meta text
which was filed against the emacs package, has been closed.
The explanation is attached below, along with your original report.
If you require more details, please reply to 12584 <at> debbugs.gnu.org.
--
12584: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=12584
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
> Here is refine working with "diff -c"
> http://puu.sh/1bXRG
> Here is refein not working with "diff -u" because of the
> aforementioned meta text
> http://puu.sh/1bXPJ
Thank you. I've installed the patch below which should fix this problem.
Stefan
=== modified file 'lisp/vc/diff-mode.el'
--- lisp/vc/diff-mode.el 2012-10-23 18:40:23 +0000
+++ lisp/vc/diff-mode.el 2012-10-26 15:50:33 +0000
@@ -482,7 +482,9 @@
(re-search-forward (if diff-valid-unified-empty-line
"^[- \n]" "^[- ]")
nil t nold)
- (line-beginning-position 2)))
+ (line-beginning-position
+ ;; Skip potential "\ No newline at end of file".
+ (if (looking-at ".*\n\\\\") 3 2))))
(endnew
;; The hunk may end with a bunch of "+" lines, so the `end' is
;; then further than computed above.
@@ -490,7 +492,9 @@
(re-search-forward (if diff-valid-unified-empty-line
"^[+ \n]" "^[+ ]")
nil t nnew)
- (line-beginning-position 2))))
+ (line-beginning-position
+ ;; Skip potential "\ No newline at end of file".
+ (if (looking-at ".*\n\\\\") 3 2)))))
(setq end (max endold endnew)))))
;; We may have a first evaluation of `end' thanks to the hunk header.
(unless end
@@ -1972,7 +1976,12 @@
(goto-char beg)
(pcase style
(`unified
- (while (re-search-forward "^\\(?:-.*\n\\)+\\(\\)\\(?:\\+.*\n\\)+"
+ (while (re-search-forward
+ (eval-when-compile
+ (let ((no-LF-at-eol-re "\\(?:\\\\.*\n\\)?"))
+ (concat "^\\(?:-.*\n\\)+" no-LF-at-eol-re
+ "\\(\\)"
+ "\\(?:\\+.*\n\\)+" no-LF-at-eol-re)))
end t)
(smerge-refine-subst (match-beginning 0) (match-end 1)
(match-end 1) (match-end 0)
[Message part 3 (message/rfc822, inline)]
Here is refine working with "diff -c"
http://puu.sh/1bXRG
Here is refein not working with "diff -u" because of the
aforementioned meta text
http://puu.sh/1bXPJ
--
Le
This bug report was last modified 12 years and 296 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.