]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/cedet/semantic/fw.el (semantic-find-file-noselect): Fix warning
authorStefan Monnier <monnier@iro.umontreal.ca>
Mon, 8 Mar 2021 00:05:02 +0000 (19:05 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Mon, 8 Mar 2021 00:05:02 +0000 (19:05 -0500)
Remove ugly hack trying to warn the user about some unknown problem,
and which stopped working in 2013 when files.el started using
lexical-binding.

lisp/cedet/semantic/fw.el

index 3c36c6cb9f8aa0e80b6582bf57a319424cfa5126..bdead99d68b4d7f4b264d11d570c0c037683f7eb 100644 (file)
@@ -322,17 +322,7 @@ calling this one."
   "Call `find-file-noselect' with various features turned off.
 Use this when referencing a file that will be soon deleted.
 FILE, NOWARN, RAWFILE, and WILDCARDS are passed into `find-file-noselect'."
-  ;; Hack -
-  ;; Check if we are in set-auto-mode, and if so, warn about this.
-  (when (boundp 'keep-mode-if-same)
-    (let ((filename (or (and (boundp 'filename) filename)
-                       "(unknown)")))
-      (message "WARNING: semantic-find-file-noselect called for \
-%s while in set-auto-mode for %s.  You should call the responsible function \
-into `mode-local-init-hook'." file filename)
-      (sit-for 1)))
-
-  (let* ((recentf-exclude '( (lambda (f) t) ))
+  (let* ((recentf-exclude #'always)
         ;; This is a brave statement.  Don't waste time loading in
         ;; lots of modes.  Especially decoration mode can waste a lot
         ;; of time for a buffer we intend to kill.