(push (vector (gnus-soup-field)
(gnus-soup-field)
(gnus-soup-field)
- (and (eq (preceding-char) ?\t)
+ (and (eq (char-before) ?\t)
(gnus-soup-field))
- (and (eq (preceding-char) ?\t)
+ (and (eq (char-before) ?\t)
(string-to-int (gnus-soup-field))))
areas)
- (when (eq (preceding-char) ?\t)
+ (when (eq (char-before) ?\t)
(beginning-of-line 2)))
(kill-buffer (current-buffer))))
areas))
(push (vector (gnus-soup-field) (gnus-soup-field)
(gnus-soup-field))
replies)
- (when (eq (preceding-char) ?\t)
+ (when (eq (char-before) ?\t)
(beginning-of-line 2)))
(kill-buffer (current-buffer)))
replies))
(search-forward "\n\n")
(forward-char -1)
(insert mail-header-separator)
- (setq message-newsreader (setq message-mailer
- (gnus-extended-version)))
+ (setq message-user-agent (gnus-extended-version))
(cond
((string= (gnus-soup-reply-kind (car replies)) "news")
(gnus-message 5 "Sending news message to %s..."