procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/facemenu.el (list-colors-display): Call `pop-to-buffer' before

Browse source 
`list-colors-print'.  (Bug#6332)
This commit is contained in:
Juri Linkov 2010-06-17 00:33:54 +03:00
parent 49b2e83db4
commit e020fb59a3
2 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2010-06-16 Juri Linkov <juri@jurta.org>
* facemenu.el (list-colors-display): Call `pop-to-buffer' before
`list-colors-print'. (Bug#6332)
2010-06-16 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/macroexp.el (macroexpand-all-1): Don't handle `lambda'

6
lisp/facemenu.el
View file

@ -600,9 +600,11 @@ You can change the color sort order by customizing `list-colors-sort'."
(with-current-buffer buf
(erase-buffer)
(setq truncate-lines t)
;; Display buffer before generating content to allow
;; `list-colors-print' to get the right window-width.
(pop-to-buffer buf)
(list-colors-print list callback)
(set-buffer-modified-p nil))
(pop-to-buffer buf))
(set-buffer-modified-p nil)))
(if callback
(message "Click on a color to select it.")))