From 47641aacc1fd1951206b5233454c15ddeaade0a6 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 11 Dec 2009 01:46:24 +0000 Subject: [PATCH] (safe-pos-list): Define for compiler. --- lisp/ChangeLog | 2 ++ lisp/progmodes/cc-engine.el | 4 +++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a7d94b0e03b..64da824a8c5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2009-12-11 Glenn Morris + * progmodes/cc-engine.el (safe-pos-list): Define for compiler. + * mail/emacsbug.el: No longer require sendmail. Replace sendmail's `mail-text' by `rfc822-goto-eoh'. (Bug#5174) (report-emacs-bug-orig-text): Doc fix. diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el index 27118620acd..15cef111c17 100644 --- a/lisp/progmodes/cc-engine.el +++ b/lisp/progmodes/cc-engine.el @@ -3743,6 +3743,8 @@ comment at the start of cc-engine.el for more info." (goto-char bound)) nil))) +(defvar safe-pos-list) ; bound in c-syntactic-skip-backward + (defsubst c-ssb-lit-begin () ;; Return the start of the literal point is in, or nil. ;; We read and write the variables `safe-pos', `safe-pos-list', `state' @@ -3756,7 +3758,7 @@ comment at the start of cc-engine.el for more info." ;; ;; FIXME: Consult `syntax-ppss' here if our cache doesn't give a good ;; position. - + (while (and safe-pos-list (> (car safe-pos-list) (point))) (setq safe-pos-list (cdr safe-pos-list))) -- 2.39.5