mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(electric-c++-terminator): Fix logic for handling colon.

Browse Source
This commit is contained in:
Richard M. Stallman 1995-06-28 21:25:06 +00:00
parent ccd318fb5b
commit e2b1cb7427
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
lisp/progmodes/cplus-md.el
View File

@ -301,15 +301,15 @@ no args if that value is non-nil."
;; So quickly rule out most other uses of colon
;; and do no indentation for them.
(and (eq last-command-char ?:)
(not (looking-at "case[ \t]"))
(save-excursion
(forward-word 1)
(skip-chars-forward " \t")
(< (point) end))
;; Do re-indent double colons
(save-excursion
(end-of-line 1)
(looking-at ":")))
(or (not (or (looking-at "case[ \t]")
(save-excursion
(forward-word 1)
(skip-chars-forward " \t")
(>= (point) end))))
;; Do re-indent double colons
(save-excursion
(end-of-line 1)
(looking-at ":"))))
(progn
(beginning-of-defun)
(let ((pps (parse-partial-sexp (point) end)))