From bdd779ec7d1f52ca75bb568b5c16272b68131698 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 19 Jun 2013 00:21:59 -0700 Subject: [PATCH] Silence idlwave compilation * lisp/progmodes/idlwave.el (func-menu): Only set it up on XEmacs. (speedbar-add-supported-extension): Declare. --- lisp/ChangeLog | 3 +++ lisp/progmodes/idlwave.el | 4 +++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 793f3ec346b..591e4499d93 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2013-06-19 Glenn Morris + * progmodes/idlwave.el (func-menu): Only set it up on XEmacs. + (speedbar-add-supported-extension): Declare. + * international/titdic-cnv.el (tit-process-header, miscdic-convert): Don't include a date stamp in the header of the generated file; it leads to needless differences between output files. diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el index ba9a632b949..ce60e05d669 100644 --- a/lisp/progmodes/idlwave.el +++ b/lisp/progmodes/idlwave.el @@ -9041,7 +9041,7 @@ Assumes that point is at the beginning of the unit as found by ;; Here we hack func-menu.el in order to support this new mode. ;; The latest versions of func-menu.el already have this stuff in, so ;; we hack only if it is not already there. -(when (fboundp 'eval-after-load) +(when (featurep 'xemacs) (eval-after-load "func-menu" '(progn (or (assq 'idlwave-mode fume-function-name-regexp-alist) @@ -9295,6 +9295,8 @@ This function was written since `list-abbrevs' looks terrible for IDLWAVE mode." (with-current-buffer "*Help*" (setq truncate-lines t))) +(declare-function speedbar-add-supported-extension "speedbar" (extension)) + ;; Add .pro files to speedbar for support, if it's loaded (eval-after-load "speedbar" '(speedbar-add-supported-extension ".pro")) -- 2.39.2