# HG changeset patch # User Roland McGrath # Date 713150027 0 # Node ID c45ba80a9da9baef4e6876edaa2d307411f3b657 # Parent ef045ff2cb943893f05463f84fc1f63342ed618b *** empty log message *** diff -r ef045ff2cb94 -r c45ba80a9da9 lisp/add-log.el --- a/lisp/add-log.el Thu Aug 06 23:56:50 1992 +0000 +++ b/lisp/add-log.el Fri Aug 07 01:13:47 1992 +0000 @@ -239,7 +239,10 @@ ((and (or (eq major-mode 'c-mode) (eq major-mode 'c++-mode)) (save-excursion (beginning-of-line) - (while (= (char-after (- (point) 2)) ?\\) + ;; Use eq instead of = here to avoid + ;; error when at bob and char-after + ;; returns nil. + (while (eq (char-after (- (point) 2)) ?\\) (forward-line -1)) (looking-at "[ \t]*#[ \t]*define[ \t]"))) ;; Handle a C macro definition.