[Emacs-diffs] Changes to emacs/lisp/add-log.el,v

[Masatake YAMATO]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Masatake YAMATO <jet>   06/12/26 03:53:05

Index: add-log.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/add-log.el,v
retrieving revision 1.180
retrieving revision 1.181
diff -u -b -r1.180 -r1.181
--- add-log.el  5 Dec 2006 05:48:28 -0000       1.180
+++ add-log.el  26 Dec 2006 03:53:04 -0000      1.181
@@ -916,7 +916,19 @@
                               ;; Include certain keywords if they
                               ;; precede the name.
                               (setq middle (point))
-                              (forward-sexp -1)
+                              ;; Single (forward-sexp -1) invocation is
+                              ;; not enough for C++ member function defined 
+                              ;; as part of nested class and/or namespace 
+                              ;; like:
+                              ;;
+                              ;;   void 
+                              ;;   foo::bar::baz::bazz ()
+                              ;;   { ...
+                              ;; 
+                              ;; Here we have to move the point to 
+                              ;; the beginning of foo, not bazz.
+                              (while (not (looking-back "\\(^\\|[ \t]\\)"))
+                                (forward-sexp -1))
                               ;; Is this C++ method?
                               (when (and (< 2 middle)
                                          (string= (buffer-substring (- middle 
2)