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

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/elpa 9bf3166 136/139: Don't define a menu if nothing to


From: João Távora
Subject: [elpa] externals/elpa 9bf3166 136/139: Don't define a menu if nothing to show there for now
Date: Mon, 14 May 2018 09:53:51 -0400 (EDT)

branch: externals/elpa
commit 9bf31667f1d1a4dfea61a96e44f658e70d9ebd85
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>

    Don't define a menu if nothing to show there for now
    
    * eglot.el (eglot-menu): Remove it.
    (eglot--mode-line-format): Don't define a menu.
---
 eglot.el | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/eglot.el b/eglot.el
index 4477242..6dc2213 100644
--- a/eglot.el
+++ b/eglot.el
@@ -843,10 +843,6 @@ that case, also signal textDocument/didOpen."
 
 ;;; Mode-line, menu and other sugar
 ;;;
-(defvar eglot-menu)
-
-(easy-menu-define eglot-menu eglot-mode-map "EGLOT" `("EGLOT" ))
-
 (defvar eglot--mode-line-format `(:eval (eglot--mode-line-format)))
 
 (put 'eglot--mode-line-format 'risky-local-variable t)
@@ -881,8 +877,7 @@ Uses THING, FACE, DEFS and PREPEND."
                (`(,_id ,doing ,done-p ,detail) (and proc (eglot--spinner 
proc)))
                (`(,status ,serious-p) (and proc (eglot--status proc))))
     (append
-     `(,(eglot--mode-line-props "eglot" 'eglot-mode-line
-                                '((down-mouse-1 eglot-menu "pop up EGLOT 
menu"))))
+     `(,(eglot--mode-line-props "eglot" 'eglot-mode-line nil))
      (when name
        `(":" ,(eglot--mode-line-props
                name 'eglot-mode-line



reply via email to

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