Commit b6715b9f authored by Miles Bader's avatar Miles Bader
Browse files

(checkbox): Swap bg/fg colors in images, and invert

image bits to compensate.  Use `make-string' instead of
`make-bool-vector' (XBM apparently wants byte-aligned rows).
parent 39f624fa
2001-10-21 Miles Bader <miles@gnu.org>
* wid-edit.el (checkbox): Swap bg/fg colors in image, and invert
image bits to compensate. Use `make-string' instead of
`make-bool-vector' (XBM apparently wants byte-aligned rows).
2001-10-20 Kim F. Storm <storm@cua.dk>
 
* simple.el (kill-ring-save): Don't show extent of copied region
......
......@@ -2020,16 +2020,17 @@ when he invoked the menu."
;; We could probably do the same job as the images using single
;; space characters in a boxed face with a stretch specification to
;; make them square.
:on-glyph (create-image "\377\311\301\343\301\311\377" ; this is an `X'
:on-glyph (create-image "\000\066\076\034\076\066\000"
'xbm t :width 7 :height 7
:foreground "grey75" ; like default mode line
:background "black"
:background "grey75" ; like default mode line
:foreground "black"
:relief -3
:ascent 'center)
:off "[ ]"
:off-glyph (create-image (make-bool-vector 49 1)
:off-glyph (create-image (make-string 7 0)
'xbm t :width 7 :height 7
:foreground "grey75"
:background "grey75"
:foreground "black"
:relief 3
:ascent 'center)
:help-echo "Toggle this item."
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment