Commit ad1879b7 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Make (setf (image-property ...)) return VALUE

* lisp/image.el (image--set-property): Return VALUE, not IMAGE.
parent 81ef756e
......@@ -448,7 +448,7 @@ Internal use only."
(setq image (cddr image))))
;; Just enter the new value.
(plist-put (cdr image) property value))
image)
value)
(defun image-property (image property)
"Return the value of PROPERTY in IMAGE.
......
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