diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2013-07-23 07:04:24 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2013-07-23 07:04:24 +0000 |
| commit | a048c2955c000241dceba39112c3cb7c3d27b647 (patch) | |
| tree | 00ed5c15aa9e035f6f15c2f28b929d2bbdf85c3b /lisp/gnus/gnus-msg.el | |
| parent | 16b0520a9e0e431cf782c01289068d8c0f812f7b (diff) | |
| download | emacs-a048c2955c000241dceba39112c3cb7c3d27b647.tar.gz | |
[Gnus] Fix previous commit
* gnus.el (gnus-continuum-version):
* gnus-msg.el (gnus-extended-version): Simplify.
* gnus.el (gnus-continuum-version-1): Remove.
* gnus-msg.el (gnus-bug): Revert.
Diffstat (limited to 'lisp/gnus/gnus-msg.el')
| -rw-r--r-- | lisp/gnus/gnus-msg.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index 761156b89c6..0f78f2edc5f 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el @@ -1132,7 +1132,9 @@ See the variable `gnus-user-agent'." (gnus-v (when (memq 'gnus gnus-user-agent) (concat "Gnus/" - (gnus-continuum-version-1 gnus-version) + (gnus-replace-in-string + (format "%1.8f" (gnus-continuum-version gnus-version)) + "0+\\'" "") " (" gnus-version ")"))) (emacs-v (gnus-emacs-version))) (concat gnus-v (when (and gnus-v emacs-v) " ") @@ -1534,7 +1536,7 @@ If YANK is non-nil, include the original article." (X-Debbugs-Package . ,(format "%s" gnus-bug-package)) (X-Debbugs-Version - . ,(gnus-continuum-version-1))))) + . ,(format "%s" (gnus-continuum-version)))))) (when gnus-bug-create-help-buffer (push `(gnus-bug-kill-buffer) message-send-actions)) (goto-char (point-min)) |