mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-06-14 04:21:24 +00:00
diff-kill-creations-deletions: Look for /dev/null on all platforms
* lisp/vc/diff-mode.el (diff-kill-creations-deletions): Look for /dev/null on platforms when null-device is something else.
This commit is contained in:
parent
eda3e9eb07
commit
99b0199253
1 changed files with 4 additions and 2 deletions
|
|
@ -1252,8 +1252,10 @@ Optional argument DELETE is passed on to `diff-file-kill'."
|
|||
(goto-char (point-min))
|
||||
(ignore-errors (diff-file-next))
|
||||
for (name1 name2) = (diff-hunk-file-names)
|
||||
if (or (equal name1 null-device)
|
||||
(equal name2 null-device))
|
||||
;; Allow for "/dev/null" on all platforms, as some versions
|
||||
;; of Diff produce that for "portability".
|
||||
if (or (member name1 (list null-device "/dev/null"))
|
||||
(member name2 (list null-device "/dev/null")))
|
||||
do (diff-file-kill delete)
|
||||
else if (eq (prog1 (point)
|
||||
(ignore-errors (diff-file-next)))
|
||||
|
|
|
|||
Loading…
Reference in a new issue