comparison lisp/gnus/gnus.el @ 31961:5daaf4090ed6

(gnus-mode-line-buffer-identification) [Emacs]: Change image's :ascent to 80. That gives a mode-line which is approx. as tall as the normal one.
author Gerd Moellmann <gerd@gnu.org>
date Thu, 28 Sep 2000 20:18:27 +0000
parents 8a6a4f06f145
children 0eb019ede5ca
comparison
equal deleted inserted replaced
31960:eb2d3d3a8eb5 31961:5daaf4090ed6
302 (list 'display 302 (list 'display
303 (if (eq t gnus-mode-line-image-cache) 303 (if (eq t gnus-mode-line-image-cache)
304 (setq gnus-mode-line-image-cache 304 (setq gnus-mode-line-image-cache
305 (find-image 305 (find-image
306 '((:type xpm :file "gnus-pointer.xpm" 306 '((:type xpm :file "gnus-pointer.xpm"
307 :ascent 100) 307 :ascent 80)
308 (:type xbm :file "gnus-pointer.xbm" 308 (:type xbm :file "gnus-pointer.xbm"
309 :ascent 100)))) 309 :ascent 80))))
310 gnus-mode-line-image-cache) 310 gnus-mode-line-image-cache)
311 'help-echo "This is Gnus") 311 'help-echo "This is Gnus")
312 str) 312 str)
313 (list str)) 313 (list str))
314 line))) 314 line)))