*** empty log message ***

lisp/add-log.el

@@ -287,16 +287,22 @@ Has a preference of looking backwards."
 					     (progn (forward-sexp 1) (point))))
 		       ;; Ordinary C function syntax.
 		       (setq beg (point))
+		       (if (condition-case nil
+			       ;; Protect against "Unbalanced parens" error.
+			       (progn
 				 (down-list 1) ; into arglist
 				 (backward-up-list 1)
 				 (skip-chars-backward " \t")
-		       ;; Verify initial pos was after real start of function.
+				 t)
+			     (error nil))
+			   ;; Verify initial pos was after
+			   ;; real start of function.
 			   (if (and (save-excursion
 				      (goto-char beg)
 				      ;; For this purpose, include the line
-				  ;; that has the decl keywords.
-				  ;; This may also include some of the comments
-				  ;; before the function.
+				      ;; that has the decl keywords.  This
+				      ;; may also include some of the
+				      ;; comments before the function.
 				      (while (and (not (bobp))
 						  (save-excursion
 						    (forward-line -1)
@@ -308,7 +314,7 @@ Has a preference of looking backwards."
 				    (> (point) beg))
 			       (buffer-substring (point)
 						 (progn (backward-sexp 1)
-						    (point)))))))))
+							(point))))))))))
 	    ((memq major-mode
 		   '(TeX-mode plain-TeX-mode LaTeX-mode;; tex-mode.el
 			      plain-tex-mode latex-mode;; cmutex.el