1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

(c-delete-backslash): Do nothing if empty line.

This commit is contained in:
Richard M. Stallman 1993-12-23 04:46:18 +00:00
parent 9f370a90b5
commit 7620dcc5bb

View File

@ -1314,10 +1314,12 @@ definition and conveniently use this command."
(defun c-delete-backslash ()
(end-of-line)
(or (bolp)
(progn
(forward-char -1)
(if (looking-at "\\\\")
(delete-region (1+ (point))
(progn (skip-chars-backward " \t") (point)))))
(progn (skip-chars-backward " \t") (point)))))))
(defun c-up-conditional (count)
"Move back to the containing preprocessor conditional, leaving mark behind.