projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(gnus-point-at-bol, gnus-point-at-eol): Remove.
[gnus]
/
lisp
/
gnus-draft.el
diff --git
a/lisp/gnus-draft.el
b/lisp/gnus-draft.el
index
4466130
..
1a3a41c
100644
(file)
--- a/
lisp/gnus-draft.el
+++ b/
lisp/gnus-draft.el
@@
-46,6
+46,7
@@
(gnus-define-keys gnus-draft-mode-map
"Dt" gnus-draft-toggle-sending
(gnus-define-keys gnus-draft-mode-map
"Dt" gnus-draft-toggle-sending
+ "e" gnus-draft-edit-message ;; Use `B w' for `gnus-summary-edit-article'
"De" gnus-draft-edit-message
"Ds" gnus-draft-send-message
"DS" gnus-draft-send-all-messages))
"De" gnus-draft-edit-message
"Ds" gnus-draft-send-message
"DS" gnus-draft-send-all-messages))
@@
-151,7
+152,7
@@
(concat "^" (regexp-quote gnus-agent-target-move-group-header)
":") nil t)
(skip-syntax-forward "-")
(concat "^" (regexp-quote gnus-agent-target-move-group-header)
":") nil t)
(skip-syntax-forward "-")
- (setq move-to (buffer-substring (point) (
gnus-
point-at-eol)))
+ (setq move-to (buffer-substring (point) (point-at-eol)))
(message-remove-header gnus-agent-target-move-group-header))
(goto-char (point-min))
(when (re-search-forward
(message-remove-header gnus-agent-target-move-group-header))
(goto-char (point-min))
(when (re-search-forward