mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-27 07:37:33 +00:00
Fix previous merge from Gnus trunk.
This commit is contained in:
parent
c7e663544a
commit
0a46a12f7a
@ -200,7 +200,7 @@ To avoid this, do something like the following:
|
||||
|
||||
@lisp
|
||||
(setq message-prune-recipient-rules
|
||||
'(("^\\([^@]+\\)@\\(.*\\)" "\\1@.*[.]\\2")))
|
||||
'(("^\\([^@@]+\\)@@\\(.*\\)" "\\1@@.*[.]\\2")))
|
||||
@end lisp
|
||||
|
||||
If, for instance, you want all wide replies that involve messages from
|
||||
@ -210,7 +210,7 @@ recipient list:
|
||||
|
||||
@lisp
|
||||
(setq message-prune-recipient-rules
|
||||
'(("cvs@example.org" ".")))
|
||||
'(("cvs@@example.org" ".")))
|
||||
@end lisp
|
||||
|
||||
@vindex message-wide-reply-confirm-recipients
|
||||
|
@ -171,8 +171,8 @@
|
||||
|
||||
(defun gnus-html-curl-sentinel (process event)
|
||||
(when (string-match "finished" event)
|
||||
(let* ((images (gnus-process-get process 'images))
|
||||
(buffer (gnus-process-get process 'buffer))
|
||||
(let* ((images (process-get process 'images))
|
||||
(buffer (process-get process 'buffer))
|
||||
(spec (pop images))
|
||||
(file (gnus-html-image-id (car spec))))
|
||||
(when (and (buffer-live-p buffer)
|
||||
|
Loading…
Reference in New Issue
Block a user