mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-30 11:09:23 +00:00
Code Issues Releases Activity

Fix brainos.

Browse Source
This commit is contained in:
Juanma Barranquero 2005-07-04 03:11:31 +00:00
parent 67da3b400f
commit bdad2e310e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/diff-mode.el
View File

@ -640,7 +640,7 @@ else cover the whole bufer."
(while (progn (setq last-pt (point))
(= (forward-line -1) 0))
(case (char-after)
(?s (insert " ") (setq modif nil) (backward-char 1))
(?\s (insert " ") (setq modif nil) (backward-char 1))
(?+ (delete-region (point) last-pt) (setq modif t))
(?- (if (not modif)
(progn (forward-char 1)
@ -665,7 +665,7 @@ else cover the whole bufer."
(let ((modif nil) (delete nil))
(while (not (eobp))
(case (char-after)
(? (insert " ") (setq modif nil) (backward-char 1))
(?\s (insert " ") (setq modif nil) (backward-char 1))
(?- (setq delete t) (setq modif t))
(?+ (if (not modif)
(progn (forward-char 1)