Function: imap-mailbox-put

imap-mailbox-put is a byte-compiled function defined in imap.el.gz.

Signature

(imap-mailbox-put PROPNAME VALUE &optional MAILBOX BUFFER)

Source Code

;; Defined in /usr/src/emacs/lisp/net/imap.el.gz
;;; Mailbox functions

(defun imap-mailbox-put (propname value &optional mailbox buffer)
  (with-current-buffer (or buffer (current-buffer))
    (if imap-mailbox-data
	(put (intern (or mailbox imap-current-mailbox) imap-mailbox-data)
	     propname value)
      (error "Imap-mailbox-data is nil, prop %s value %s mailbox %s buffer %s"
	     propname value mailbox (current-buffer)))
    t))