[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#20508: 24.4; image map properties not working as described
From: |
patrick mc allister |
Subject: |
bug#20508: 24.4; image map properties not working as described |
Date: |
Wed, 6 May 2015 09:15:44 +0200 |
User-agent: |
Mutt/1.5.23 (2014-03-12) |
On Tue, May 05, 2015 at 10:14:31PM +0300, Eli Zaretskii wrote:
>
> This variant works as you expect:
>
> (defun image-wipe-and-insert-two-maps ()
> (interactive)
> (let ()
> (with-current-buffer (get-buffer-create "*an image area test buffer*")
> (switch-to-buffer (current-buffer))
> (erase-buffer)
> (insert-image (find-image '((:type png :file
> "/usr/share/emacs/24.4/etc/images/icons/hicolor/128x128/apps/emacs.png"
> :map (list
> ((rect . ((0 . 0) . (50 . 50)))
> anAreaID (pointer hourglass help-echo "You found an area!"))
> ((rect . ((51 . 51) . (100 .
> 100))) aSecondAreaID (pointer hand help-echo "You found another area!")))
> ;; :relief -20
> ;; :conversion laplace
> :margin (0 . 0)
> :pointer arrow)))))))
>
> (Figuring out why you need that explicit call to 'list' is left as an
> exercise ;-)
Thanks again, another thing I missed!
best regards,
--
patrick
signature.asc
Description: Digital signature