emacs-elpa-diffs
[Top][All Lists]
Advanced

[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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]