From 34b41e3bc63db635612233a887a30ef11651c1c1 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 9 Jan 2018 13:54:11 -0500 Subject: [PATCH] Quieten semantic normal usage * lisp/cedet/semantic/lex.el (semantic-flex): Mark obsolete at compile time in the normal way, not at run-time. (Bug#30035) --- lisp/cedet/semantic/lex.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/cedet/semantic/lex.el b/lisp/cedet/semantic/lex.el index 9a35dd82f06..3a8b0c78002 100644 --- a/lisp/cedet/semantic/lex.el +++ b/lisp/cedet/semantic/lex.el @@ -471,6 +471,7 @@ PROPERTY set." ;;; Lexical Analyzer framework settings ;; +;; FIXME change to non-obsolete default. (defvar semantic-lex-analyzer 'semantic-flex "The lexical analyzer used for a given buffer. See `semantic-lex' for documentation. @@ -1857,7 +1858,7 @@ end of the return token will be larger than END. To truly restrict scanning, use `narrow-to-region'. The last argument, LENGTH specifies that `semantic-flex' should only return LENGTH tokens." - (message "`semantic-flex' is an obsolete function. Use `define-lex' to create lexers.") + (declare (obsolete define-lex "23.2")) (if (not semantic-flex-keywords-obarray) (setq semantic-flex-keywords-obarray [ nil ])) (let ((ts nil) -- 2.39.5