summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarsten Dominik <carsten.dominik@gmail.com>2011-01-13 18:31:34 +0100
committerCarsten Dominik <carsten.dominik@gmail.com>2011-01-13 18:31:34 +0100
commitbc841dcf235290b95947b9287e2553b25eef6b99 (patch)
treee99da10603180d5c68d1f537ed461a37a106d74c
parent47537dcda8709793bdea5f2e43f3dd8d4c4f86b9 (diff)
downloadorg-mode-bc841dcf235290b95947b9287e2553b25eef6b99.tar.gz
Revert "Fix org-store-link in GNUS messages with date"
This reverts commit e599234d5c0245dfc53037a6dc0128349b197627.
-rw-r--r--lisp/org-gnus.el15
1 files changed, 5 insertions, 10 deletions
diff --git a/lisp/org-gnus.el b/lisp/org-gnus.el
index ae5dc52..32641bf 100644
--- a/lisp/org-gnus.el
+++ b/lisp/org-gnus.el
@@ -152,16 +152,11 @@ If `org-store-link' was called with a prefix arg the meaning of
(from (mail-header-from header))
(message-id (org-remove-angle-brackets (mail-header-id header)))
(date (org-trim (mail-header-date header)))
- (date-ts (and date
- (condition-case nil
- (format-time-string
- (org-time-stamp-format t)
- (date-to-time date)))))
- (date-ts-ia (and date
- (condition-case nil
- (format-time-string
- (org-time-stamp-format t t)
- (date-to-time date)))))
+ (date-ts (and date (format-time-string
+ (org-time-stamp-format t) (date-to-time date))))
+ (date-ts-ia (and date (format-time-string
+ (org-time-stamp-format t t)
+ (date-to-time date))))
(subject (copy-sequence (mail-header-subject header)))
(to (cdr (assq 'To (mail-header-extra header))))
newsgroups x-no-archive desc link)