Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
4faaa994
Commit
4faaa994
authored
Nov 08, 2000
by
Dave Love
Browse files
Put some defvars in eval-when-compile.
(gnus-msg-mail): Move after gnus-setup-message.
parent
1424c9bf
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
12 additions
and
12 deletions
+12
-12
lisp/gnus/gnus-msg.el
lisp/gnus/gnus-msg.el
+12
-12
No files found.
lisp/gnus/gnus-msg.el
View file @
4faaa994
...
...
@@ -203,15 +203,6 @@ Thank you for your help in stamping out bugs.
;; "c" gnus-summary-send-draft
"r"
gnus-summary-resend-message
)
;;;###autoload
(
defun
gnus-msg-mail
(
&rest
args
)
"Start editing a mail message to be sent.
Like `message-mail', but with Gnus paraphernalia, particularly the
the Gcc: header for archiving purposes."
(
interactive
)
(
gnus-setup-message
'message
(
apply
'message-mail
args
)))
;;;###autoload
(
define-mail-user-agent
'gnus-user-agent
'gnus-msg-mail
'message-send-and-exit
...
...
@@ -435,7 +426,15 @@ header line with the old Message-ID."
(
gnus-cache-possibly-remove-article
,
article
nil
nil
nil
t
)
(
gnus-summary-mark-as-read
,
article
gnus-canceled-mark
)))))
message-send-actions
))))
;;;###autoload
(
defun
gnus-msg-mail
(
&rest
args
)
"Start editing a mail message to be sent.
Like `message-mail', but with Gnus paraphernalia, particularly the
the Gcc: header for archiving purposes."
(
interactive
)
(
gnus-setup-message
'message
(
apply
'message-mail
args
)))
(
defun
gnus-copy-article-buffer
(
&optional
article-buffer
)
...
...
@@ -622,8 +621,9 @@ If SILENT, don't prompt the user."
;; Dummies to avoid byte-compile warning.
(
defvar
nnspool-rejected-article-hook
)
(
defvar
xemacs-codename
)
(
eval-when-compile
(
defvar
nnspool-rejected-article-hook
)
(
defvar
xemacs-codename
))
(
defun
gnus-extended-version
()
"Stringified Gnus version and Emacs version."
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment