GNU bug report logs - #14969
XBM image properties :foreground :background do not work on OSX

Previous Next

Full log

Message #8 received at 14969 <at> debbugs.gnu.org (full text, mbox):

From: "Jan D." <jan.h.d <at> swipnet.se>
To: Willem Rein Oudshoorn <woudshoo <at> xs4all.nl>
Cc: 14969 <at> debbugs.gnu.org
Subject: Re: bug#14969: XBM image properties :foreground :background do not
 work on OSX
Date: Wed, 31 Jul 2013 13:48:17 +0200

Hello.

Can somebody say if this requires copyright assignment?

    Jan D.

Willem Rein Oudshoorn skrev 2013-07-27 22:12:
> As in the subject, the XBM image properties :foreground :background
> have no effect on OSX.
>
> This is easily tested with:
>
> =========
> (defun make-test-image (foreground background)
>    `(image :type xbm
> 	  :data
> 	  ,(let ((data (make-bool-vector (* 10 10) nil))
> 		 (index 0))
> 	     (while (< index (* 10 10))
> 	       (aset data index (= 0 (% index 3)))
> 	       (setq index (+ 1 index)))
> 	     data)
> 	  :height 10
> 	  :width 10
> 	  :foreground ,foreground
> 	  :background ,background))
>
>
> (defun test-images ()
>    (interactive)
>    (insert-image (make-test-image nil nil))
>    (insert-image (make-test-image "red" nil))
>    (insert-image (make-test-image nil "green"))
>    (insert-image (make-test-image "blue" "orange")))
> =========
>
> After running `test-images' I expect differently colored images, but
> they are all monochrome. (black and white).
>
> After applying the following patch, it works for nextstep based terminal
> systems.
>
> I have tried to adher to the style already present in the file,
> and I do not the setup is the most elegant.  But changing that
> would require a more intrusive patch.
>
>
> Wim Oudshoorn.
>

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.