[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master f49cb6f: * ada-mode/ada-mode.el: Don't define other packag
From: |
Stefan Monnier |
Subject: |
[elpa] master f49cb6f: * ada-mode/ada-mode.el: Don't define other packages's vars |
Date: |
Wed, 22 Jul 2020 13:15:37 -0400 (EDT) |
branch: master
commit f49cb6f63a15ecc6aafe5efc45eb9a84b1551093
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* ada-mode/ada-mode.el: Don't define other packages's vars
(which-func-functions, which-func-non-auto-modes): Declare instead of
define!
(ada-mode): Adjust accordingly.
---
packages/ada-mode/ada-mode.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/packages/ada-mode/ada-mode.el b/packages/ada-mode/ada-mode.el
index 369c1a0..e8777fe 100644
--- a/packages/ada-mode/ada-mode.el
+++ b/packages/ada-mode/ada-mode.el
@@ -1520,8 +1520,8 @@ Prompts with completion, defaults to filename at point."
;;;; ada-mode
-(defvar which-func-functions nil) ;; which-func.el
-(defvar which-func-non-auto-modes nil) ;; ""
+(defvar which-func-functions) ;; which-func.el
+(defvar which-func-non-auto-modes) ;; ""
;;;###autoload
(define-derived-mode ada-mode prog-mode "Ada"
@@ -1578,7 +1578,8 @@ Prompts with completion, defaults to filename at point."
;; loaded later, it will use the add-log which-function, which
;; forces a navigate parse.
(add-hook 'which-func-functions #'ada-which-function nil t)
- (add-to-list 'which-func-non-auto-modes 'ada-mode)
+ (when (boundp 'which-func-non-auto-modes)
+ (add-to-list 'which-func-non-auto-modes 'ada-mode))
;; Support for align
(add-to-list 'align-dq-string-modes 'ada-mode)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master f49cb6f: * ada-mode/ada-mode.el: Don't define other packages's vars,
Stefan Monnier <=