Commit 6d49b2d8 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

* pmail.el (pmail-require-mime-maybe): Fix arguments of `display-warning'.

parent d5c78b09
2008-12-15 Juanma Barranquero <lekktu@gmail.com>
* pmail.el (pmail-require-mime-maybe):
Fix arguments of `display-warning'.
2008-12-15 Chong Yidong <cyd@stupidchicken.com>
* pmail.el (pmail): Call pmail-swap-buffers-maybe.
......
......@@ -824,13 +824,14 @@ isn't provided."
(require pmail-mime-feature)
(error
(display-warning
:warning
'pmail
(format "Although MIME support is requested
by setting `pmail-enable-mime' to non-nil, the required feature
`%s' (the value of `pmail-mime-feature')
is not available in the current session.
So, the MIME support is turned off for the moment."
pmail-mime-feature))
So, the MIME support is turned off for the moment."
pmail-mime-feature)
:warning)
(setq pmail-enable-mime nil)))))
......@@ -1683,7 +1684,7 @@ It returns t if it got any new messages."
(when spam-filter-p
(if rsf-beep (beep t))
(sleep-for rsf-sleep-after-message))
;; Establish the return value and move to the first new
;; message unless we have other unseen messages before it.
(setq result (> new-messages 0))
......@@ -1751,7 +1752,7 @@ is non-nil if the user has supplied the password interactively.
;; The password is embedded. Strip it out since movemail
;; does not really like it, in spite of the movemail spec.
(setq file (concat proto "://" user "@" host)))
(if (pmail-movemail-variant-p 'emacs)
(if (string-equal proto "pop")
(list (concat "po:" user ":" host)
......@@ -1943,7 +1944,7 @@ message (including the blank line separator)."
(goto-char (point-max))
(forward-char -1)
(insert name ": " value "\n"))
(defun pmail-add-mbox-headers ()
"Validate the RFC2822 format for the new messages.
Point should be at the first new message.
......@@ -2072,7 +2073,7 @@ current mail message will be used otherwise."
(narrow-to-region beg end)
(mail-fetch-field name))
(pmail-error-bad-format msg)))))))
(defun pmail-get-attr-names (&optional msg)
"Return the message attributes in a comma separated string.
MSG, if set identifies the message number to use. The current
......
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