unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#23918: 25.1.50; Menu bar breakage
@ 2016-07-08 14:20 Stephen Berman
  2016-07-08 14:59 ` martin rudalics
  0 siblings, 1 reply; 5+ messages in thread
From: Stephen Berman @ 2016-07-08 14:20 UTC (permalink / raw)
  To: 23918

0. emacs -Q
1. Click on the Options menu and check "Error Debugger on Error".
2. Click on any item in the menu bar.
=> Debugger entered--Lisp error: (void-function nilp)
     (nilp vsb)

This is due to this change:

commit a7e302dc1dc18770aaf9eeedfd638f73b574bc19
Author: Dmitry Antipov <dmantipov@yandex.ru>
Date:   Tue Jul 5 08:33:29 2016 +0300

  Prefer 'frame-parameter' where it is expected to be a bit faster
  
  * lisp/international/mule-diag.el (mule-diag):
  * lisp/menu-bar.el (menu-bar-showhide-scroll-bar-menu):
  * lisp/mouse.el (mouse-drag-line, font-menu-add-default):
  * lisp/scroll-bar.el (toggle-scroll-bar, toggle-horizontal-scroll-bar):
  * lisp/faces.el (x-resolve-font-name): Use 'frame-parameter'.

However, after fixing the typo (nilp -> not) and rebuilding emacs,
executing the above recipe nows displays this error:

   Debugger entered--Lisp error: (void-variable vsb)
     (not vsb)

The patch below fixes this (and the typo).

In GNU Emacs 25.1.50.10 (x86_64-suse-linux-gnu, GTK+ Version 3.14.15)
 of 2016-07-08 built on rosalinde
Repository revision: 56c8551219ecace0157ce813733adf8eecb38c32
Windowing system distributor 'The X.Org Foundation', version 11.0.11601000
System Description:	openSUSE 13.2 (Harlequin) (x86_64)

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index c4f094a..9f3156d 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -993,39 +993,39 @@ menu-bar-showhide-scroll-bar-menu
         (vsb (frame-parameter nil 'vertical-scroll-bars))
         (hsb (frame-parameter nil 'horizontal-scroll-bars)))
     (bindings--define-key menu [horizontal]
-      '(menu-item "Horizontal"
+      `(menu-item "Horizontal"
                   menu-bar-horizontal-scroll-bar
                   :help "Horizontal scroll bar"
                   :visible (horizontal-scroll-bars-available-p)
-                  :button (:radio . hsb)))
+                  :button (:radio . ,hsb)))
 
     (bindings--define-key menu [none-horizontal]
-      '(menu-item "None-horizontal"
+      `(menu-item "None-horizontal"
                   menu-bar-no-horizontal-scroll-bar
                   :help "Turn off horizontal scroll bars"
                   :visible (horizontal-scroll-bars-available-p)
-                  :button (:radio . (not hsb))))
+                  :button (:radio . (not ,hsb))))
 
     (bindings--define-key menu [right]
-      '(menu-item "On the Right"
+      `(menu-item "On the Right"
                   menu-bar-right-scroll-bar
                   :help "Scroll-bar on the right side"
                   :visible (display-graphic-p)
-                  :button (:radio . (eq vsb 'right))))
+                  :button (:radio . (eq ,vsb 'right))))
 
     (bindings--define-key menu [left]
-      '(menu-item "On the Left"
+      `(menu-item "On the Left"
                   menu-bar-left-scroll-bar
                   :help "Scroll-bar on the left side"
                   :visible (display-graphic-p)
-                  :button (:radio . (eq vsb 'left))))
+                  :button (:radio . (eq ,vsb 'left))))
 
     (bindings--define-key menu [none]
-      '(menu-item "None"
+      `(menu-item "None"
                   menu-bar-no-scroll-bar
                   :help "Turn off scroll-bar"
                   :visible (display-graphic-p)
-                  :button (:radio . (nilp vsb))))
+                  :button (:radio . (not ,vsb))))
     menu))
 
 (defun menu-bar-frame-for-menubar ()





^ permalink raw reply related	[flat|nested] 5+ messages in thread

* bug#23918: 25.1.50; Menu bar breakage
  2016-07-08 14:20 bug#23918: 25.1.50; Menu bar breakage Stephen Berman
@ 2016-07-08 14:59 ` martin rudalics
  2016-07-08 15:23   ` Stephen Berman
  0 siblings, 1 reply; 5+ messages in thread
From: martin rudalics @ 2016-07-08 14:59 UTC (permalink / raw)
  To: Stephen Berman, 23918

 > The patch below fixes this (and the typo).

Please install.  Here on Windows clicking on _any_ menu item gets me

Debugger entered--Lisp error: (void-function nilp)
   (nilp vsb)

and Windows stalls in a sense that I'm not able to switch tasks normally
(not with emacs -Q but I'm not very keen to track this issue down).  The
only remedy is currently to shut down this instance of Emacs.

Thanks, martin





^ permalink raw reply	[flat|nested] 5+ messages in thread

* bug#23918: 25.1.50; Menu bar breakage
  2016-07-08 14:59 ` martin rudalics
@ 2016-07-08 15:23   ` Stephen Berman
  2016-07-08 15:44     ` martin rudalics
  0 siblings, 1 reply; 5+ messages in thread
From: Stephen Berman @ 2016-07-08 15:23 UTC (permalink / raw)
  To: martin rudalics; +Cc: 23918

On Fri, 08 Jul 2016 16:59:49 +0200 martin rudalics <rudalics@gmx.at> wrote:

>> The patch below fixes this (and the typo).
>
> Please install.

Done as commit 381c6bb on master.

Steve Berman





^ permalink raw reply	[flat|nested] 5+ messages in thread

* bug#23918: 25.1.50; Menu bar breakage
  2016-07-08 15:23   ` Stephen Berman
@ 2016-07-08 15:44     ` martin rudalics
  2016-07-08 17:58       ` Dmitry Antipov
  0 siblings, 1 reply; 5+ messages in thread
From: martin rudalics @ 2016-07-08 15:44 UTC (permalink / raw)
  To: Stephen Berman; +Cc: 23918

 >> Please install.
 >
 > Done as commit 381c6bb on master.

Thank you very much, martin





^ permalink raw reply	[flat|nested] 5+ messages in thread

* bug#23918: 25.1.50; Menu bar breakage
  2016-07-08 15:44     ` martin rudalics
@ 2016-07-08 17:58       ` Dmitry Antipov
  0 siblings, 0 replies; 5+ messages in thread
From: Dmitry Antipov @ 2016-07-08 17:58 UTC (permalink / raw)
  To: Stephen Berman; +Cc: 23918

On 07/08/2016 06:44 PM, martin rudalics wrote:

>>> Please install.
>>
>> Done as commit 381c6bb on master.
>
> Thank you very much, martin

Oops...sorry for that mess, and thanks.

Dmitry






^ permalink raw reply	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2016-07-08 17:58 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-07-08 14:20 bug#23918: 25.1.50; Menu bar breakage Stephen Berman
2016-07-08 14:59 ` martin rudalics
2016-07-08 15:23   ` Stephen Berman
2016-07-08 15:44     ` martin rudalics
2016-07-08 17:58       ` Dmitry Antipov

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).