+2007-10-15 Sam Steingold <sds@gnu.org>
+
+ * sendmail.el (sendmail-error-reporting-interactive)
+ (sendmail-error-reporting-non-interactive): New variables for
+ sendmail error reporting options to simplify support for imperfect
+ sendmail emulators.
+ (sendmail-send-it): Use them instead of list literals.
+
2007-10-04 Reiner Steib <Reiner.Steib@gmx.de>
* Relicense "GPLv2 or later" files to "GPLv3 or later".
+2007-09-23 Richard Stallman <rms@gnu.org>
+
+ * sendmail.el (mail-bury): Delete the frame if this frame looks
+ like it was made for this message.
+
2007-09-16 Andreas Seltenreich <andreas@gate450.dyndns.org>
* nnir.el (nnir-run-query): Add a find-grep engine.
"Bury this mail buffer."
(let ((newbuf (other-buffer (current-buffer))))
(bury-buffer (current-buffer))
- (if (and (or (window-dedicated-p (frame-selected-window))
+ (if (and (or nil
+ ;; In this case, we need to go to a different frame.
+ (window-dedicated-p (frame-selected-window))
+ ;; In this mode of operation, the frame was probably
+ ;; made for this buffer, so the user probably wants
+ ;; to delete it now.
+ (and pop-up-frames (one-window-p))
(cdr (assq 'mail-dedicated-frame (frame-parameters))))
(not (null (delq (selected-frame) (visible-frame-list)))))
(progn
nil)
(t (error "Invalid value for `mail-from-style'")))))
+;; Normally you will not need to modify these options unless you are
+;; using some non-genuine substitute for sendmail which does not
+;; implement each and every option that the original supports.
+;; E.g., ssmtp does not support "-odb", so, if your site uses it,
+;; you will need to modify `sendmail-error-reporting-non-interactive'
+;; in your site-init.el.
+(defvar sendmail-error-reporting-interactive
+ ;; These mean "report errors to terminal" and "deliver interactively"
+ '("-oep" "-odi"))
+(defvar sendmail-error-reporting-non-interactive
+ ;; These mean "report errors by mail" and "deliver in background".
+ '("-oem" "-odb"))
+
(defun sendmail-send-it ()
"Send the current mail buffer using the Sendmail package.
This is a suitable value for `send-mail-function'. It sends using the
(and mail-alias-file
(list (concat "-oA" mail-alias-file)))
(if mail-interactive
- ;; These mean "report errors to terminal"
- ;; and "deliver interactively"
- '("-oep" "-odi")
- ;; These mean "report errors by mail"
- ;; and "deliver in background".
- '("-oem" "-odb"))
+ sendmail-error-reporting-interactive
+ sendmail-error-reporting-non-interactive)
;; Get the addresses from the message
;; unless this is a resend.
;; We must not do that for a resend
(gnus-treat-emphasize, gnus-treat-body-boundary): Don't test
window-system.
+2007-10-28 Miles Bader <miles@gnu.org>
+
+ * nnheader.el (nnheader-uniquify-message-id): Make sure this is defined
+ at compile-time too.
+
2007-10-27 Reiner Steib <Reiner.Steib@gmx.de>
* gnus-msg.el (gnus-message-setup-hook): Add
(gnus-article-add-buttons): Use it.
(gnus-button-push): Use concatenated url that it makes.
+2007-10-04 Juanma Barranquero <lekktu@gmail.com>
+
+ * sieve-manage.el (sieve-manage-interactive-login): Doc fix.
+
+2007-10-02 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * gnus-uu.el (gnus-uu-reginize-string, gnus-uu-expand-numbers):
+ Don't hardcode point-min==1.
+
2007-10-08 Reiner Steib <Reiner.Steib@gmx.de>
* mm-util.el (mm-charset-synonym-alist): Alias gbk to cp936.
nil t)
(replace-match "\\1[0-9]+\\2[0-9]+" t nil nil nil))))
- (goto-char 1)
+ (goto-char (point-min))
(while (re-search-forward "[ \t]+" nil t)
(replace-match "[ \t]+" t t))
(format "%06d"
(string-to-number (buffer-substring
(match-beginning 0) (match-end 0)))))))
- (setq string (buffer-substring 1 (point-max)))
+ (setq string (buffer-substring (point-min) (point-max)))
(setcar (car string-list) string)
(setq string-list (cdr string-list))))
out-list))
out)))
out))
-(defvar nnheader-uniquify-message-id nil)
+(eval-and-compile
+ (defvar nnheader-uniquify-message-id nil))
(defmacro nnheader-nov-read-message-id (&optional number)
`(let ((id (nnheader-nov-field)))
(defun sieve-manage-interactive-login (buffer loginfunc)
"Login to server in BUFFER.
LOGINFUNC is passed a username and a password, it should return t if
-it where sucessful authenticating itself to the server, nil otherwise.
+it was successful authenticating itself to the server, nil otherwise.
Returns t if login was successful, nil otherwise."
(with-current-buffer buffer
(make-local-variable 'sieve-manage-username)
Jingle please: Gnus 5.10 is released, get it while it's
hot! As well as the step in version number is rather
small, Gnus 5.10 has tons of new features which you
-shouldn't miss. The current release (5.10.8) should be at
+shouldn't miss. The current release (5.13) should be at
least as stable as the latest release of the 5.8 series.
@node [1.2]