* [mvsfrasson@gmail.com: tool-bar does update properly]
@ 2006-08-22 15:41 Richard Stallman
2006-08-22 21:32 ` Kim F. Storm
0 siblings, 1 reply; 2+ messages in thread
From: Richard Stallman @ 2006-08-22 15:41 UTC (permalink / raw)
Would someone please DTRT and ack this message?
------- Start of forwarded message -------
Date: Thu, 17 Aug 2006 08:39:08 -0300
From: "Miguel V. S. Frasson" <mvsfrasson@gmail.com>
To: emacs-pretest-bug@gnu.org
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Disposition: inline
Subject: tool-bar does update properly
X-Spam-Status: No, score=0.0 required=5.0 tests=RCVD_BY_IP autolearn=failed
version=3.0.4
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
mvsfrasson@gmail.com
_______________________________________________
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
------- End of forwarded message -------
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: [mvsfrasson@gmail.com: tool-bar does update properly]
2006-08-22 15:41 [mvsfrasson@gmail.com: tool-bar does update properly] Richard Stallman
@ 2006-08-22 21:32 ` Kim F. Storm
0 siblings, 0 replies; 2+ messages in thread
From: Kim F. Storm @ 2006-08-22 21:32 UTC (permalink / raw)
Cc: mvsfrasson, emacs-devel
Richard Stallman <rms@gnu.org> writes:
> Would someone please DTRT and ack this message?
I have just installed a change to fix this.
>
> From: "Miguel V. S. Frasson" <mvsfrasson@gmail.com>
> Subject: tool-bar does update properly
> To: emacs-pretest-bug@gnu.org
> 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
> mvsfrasson@gmail.com
>
>
> _______________________________________________
> emacs-pretest-bug mailing list
> emacs-pretest-bug@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
> ----------
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2006-08-22 21:32 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2006-08-22 15:41 [mvsfrasson@gmail.com: tool-bar does update properly] Richard Stallman
2006-08-22 21:32 ` Kim F. Storm
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).