[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#14969: XBM image properties :foreground :background do not work on O

From: Jan D.
Subject: bug#14969: XBM image properties :foreground :background do not work on OSX
Date: Wed, 31 Jul 2013 13:48:17 +0200
User-agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:17.0) Gecko/17.0 Thunderbird/17.0


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
          ,(let ((data (make-bool-vector (* 10 10) nil))
                 (index 0))
             (while (< index (* 10 10))
               (aset data index (= 0 (% index 3)))
               (setq index (+ 1 index)))
          :height 10
          :width 10
          :foreground ,foreground
          :background ,background))

(defun test-images ()
   (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

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.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]