Function: image--set-property

image--set-property is a byte-compiled function defined in image.el.gz.

Signature

(image--set-property IMAGE PROPERTY VALUE)

Documentation

Set PROPERTY in IMAGE to VALUE.

Internal use only.

Source Code

;; Defined in /usr/src/emacs/lisp/image.el.gz
(defun image--set-property (image property value)
  "Set PROPERTY in IMAGE to VALUE.
Internal use only."
  (if (null value)
      (while (cdr image)
        ;; IMAGE starts with the symbol `image', and the rest is a
        ;; plist.  Decouple plist entries where the key matches
        ;; the property.
        (if (eq (cadr image) property)
            (setcdr image (cdddr image))
          (setq image (cddr image))))
    ;; Just enter the new value.
    (setcdr image (plist-put (cdr image) property value)))
  value)