emacs-devel
[Top][All Lists]
Advanced

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

Re: address@hidden: tool-bar does update properly]


From: Kim F. Storm
Subject: Re: address@hidden: tool-bar does update properly]
Date: Tue, 22 Aug 2006 23:32:25 +0200
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

Richard Stallman <address@hidden> writes:

> Would someone please DTRT and ack this message?

I have just installed a change to fix this.

>
> From: "Miguel V. S. Frasson" <address@hidden>
> Subject: tool-bar does update properly
> To: address@hidden
> Date: Thu, 17 Aug 2006 08:39:08 -0300
>
> Hi
>
> If two keymaps for toolbars start with same buttons, switching from
> larger to smaller does not update the toolbar.
>
> Test case:
>
> Evaluate the following
>
> 1) emacs -Q  (please have the toolbar enabled)
>
> 2) Evaluate
>
> (progn
>  ;; map1 has open button
>  (setq map1 (make-sparse-keymap))
>  (tool-bar-local-item-from-menu 'menu-find-file-existing "open" map1)
>  ;; map2 has open and new buttons (both must start with the same button)
>  (setq map2 (make-sparse-keymap))
>  (tool-bar-local-item-from-menu 'menu-find-file-existing "open" map2)
>  (tool-bar-local-item-from-menu 'find-file "new" map2)
>  (make-local-variable 'tool-bar-map)
>  ;; variable to switch toolbars
>  (setq foo nil))
>
> 3) Keep evaluating
>
> (setq tool-bar-map
>      (if (setq foo (not foo)) map1 map2))  ;<-- eval here several times
>
> You may see that the toolbar does not change
>
> Now do the following
>
> 4) Repeat the following: eval expression in 3) and switch to another
>   buffer and switch back.
>
> You see that the toolbar is refresh accordingly.
>
> If the smaller toolbar is set, switching to the larger, the toolbar
> gets updated, but not the other way around.  I can reproduce this
> behavior in Emacs using GNU/Linux (not so old build) and M$ Windows
> (quite few months old).
>
> Sincerely
>
> Miguel.
>
> If emacs crashed, and you have the emacs process in the gdb debugger,
> please include the output from the following gdb commands:
>    `bt full' and `xbacktrace'.
> If you would like to further debug the crash, please read the file
> /usr/local/share/emacs/22.0.50/etc/DEBUG for instructions.
>
>
> In GNU Emacs 22.0.50.3 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
> of 2006-06-09 on miguel
> X server distributor `The X.Org Foundation', version 11.0.60802000
> Important settings:
>  value of $LC_ALL: nil
>  value of $LC_COLLATE: nil
>  value of $LC_CTYPE: nil
>  value of $LC_MESSAGES: nil
>  value of $LC_MONETARY: nil
>  value of $LC_NUMERIC: nil
>  value of $LC_TIME: nil
>  value of $LANG: en_US.UTF-8
>  locale-coding-system: utf-8
>  default-enable-multibyte-characters: t
>
> Major mode: Lisp Interaction
>
> Minor modes in effect:
>  show-paren-mode: t
>  delete-selection-mode: t
>  pc-selection-mode: t
>  tooltip-mode: t
>  tool-bar-mode: t
>  mouse-wheel-mode: t
>  menu-bar-mode: t
>  file-name-shadow-mode: t
>  global-font-lock-mode: t
>  font-lock-mode: t
>  blink-cursor-mode: t
>  unify-8859-on-encoding-mode: t
>  utf-translate-cjk-mode: t
>  auto-compression-mode: t
>  line-number-mode: t
>  transient-mark-mode: t
>
> Recent input:
> C-e <down> <down> <down> <end> C-x C-e C-x C-e C-x
> C-e C-x C-e C-x C-e C-x C-e C-x C-e <left> <left> C-x
> C-e <left> <left> <C-left> <left> C-x C-e <up> <up>
> <up> <up> <up> <up> <up> <home> <S-end> <delete> <down>
> <S-end> <C-insert> <up> <S-insert> <C-left> <right>
> <right> <right> <delete> 1 <end> <down> <down> <down>
> <down> C-x C-e <down> <down> <down> <end> C-x C-e C-x
> C-e C-x C-e C-x C-e C-x C-e C-x C-e C-x b <return>
> C-x b <return> C-x C-e C-x b <return> C-x b <return>
> C-x C-e <up> <down> M-x r e p o r t <tab> <return>
>
> Recent messages:
> (keymap (open-file menu-item "Open File..." menu-find-file-existing
> (nil) :enable (menu-bar-non-minibuffer-window-p) :help "Read an
> existing file into an Emacs buffer" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")) (new-file
> menu-item "Visit New File..." find-file ([24 6] . "  (C-x C-f)")
> :enable (menu-bar-non-minibuffer-window-p) :help "Specify a new file's
> name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/new.xpm")))
> (keymap (new-file menu-item "Visit New File..." find-file ([24 6] . "
> (C-x C-f)") :enable (menu-bar-non-minibuffer-window-p) :help "Specify
> a new file's name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")))
> (keymap (open-file menu-item "Open File..." menu-find-file-existing
> (nil) :enable (menu-bar-non-minibuffer-window-p) :help "Read an
> existing file into an Emacs buffer" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")) (new-file
> menu-item "Visit New File..." find-file ([24 6] . "  (C-x C-f)")
> :enable (menu-bar-non-minibuffer-window-p) :help "Specify a new file's
> name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/new.xpm")))
> (keymap (new-file menu-item "Visit New File..." find-file ([24 6] . "
> (C-x C-f)") :enable (menu-bar-non-minibuffer-window-p) :help "Specify
> a new file's name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")))
> (keymap (open-file menu-item "Open File..." menu-find-file-existing
> (nil) :enable (menu-bar-non-minibuffer-window-p) :help "Read an
> existing file into an Emacs buffer" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")) (new-file
> menu-item "Visit New File..." find-file ([24 6] . "  (C-x C-f)")
> :enable (menu-bar-non-minibuffer-window-p) :help "Specify a new file's
> name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/new.xpm")))
> (keymap (new-file menu-item "Visit New File..." find-file ([24 6] . "
> (C-x C-f)") :enable (menu-bar-non-minibuffer-window-p) :help "Specify
> a new file's name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")))
> Mark set [3 times]
> nil
> (keymap (open-file menu-item "Open File..." menu-find-file-existing
> (nil) :enable (menu-bar-non-minibuffer-window-p) :help "Read an
> existing file into an Emacs buffer" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/open.xpm")) (new-file
> menu-item "Visit New File..." find-file ([24 6] . "  (C-x C-f)")
> :enable (menu-bar-non-minibuffer-window-p) :help "Specify a new file's
> name, to edit the file" :image (image :type xpm :file
> "/usr/local/share/emacs/22.0.50/etc/images/new.xpm")))
> Loading emacsbug...done
> - -- 
> Miguel Vinicius Santini Frasson
> address@hidden
>
>
> _______________________________________________
> emacs-pretest-bug mailing list
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
> ----------





reply via email to

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