Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-24 05:47:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

(add-log-current-defun): Handle private', public' in C++ class definitions.

Browse source
This commit is contained in:
Richard M. Stallman 1995-10-20 15:22:56 +00:00
parent 7badea3036
commit 6dfa1d83fd
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/add-log.el
View file

@ -444,6 +444,14 @@ Has a preference of looking backwards."
;; precede the name.
(setq middle (point))
(forward-word -1)
;; Ignore these subparts of a class decl
;; and move back to the class name itself.
(while (looking-at "public \\|private ")
(skip-chars-backward " \t:")
(setq end (point))
(backward-sexp 1)
(setq middle (point))
(forward-word -1))
(and (bolp)
(looking-at "struct \\|union \\|class ")
(setq middle (point)))