1 files changed, 8 insertions, 0 deletions

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 41ada9f91bb..48a72a9a3ec 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -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)))