diff options
author | Vincent Ambo <tazjin@google.com> | 2019-12-27T18·16+0100 |
---|---|---|
committer | Vincent Ambo <tazjin@google.com> | 2019-12-27T18·18+0100 |
commit | 08dd267c19fcc224a48c2f5a5c0dacb7f8b8acea (patch) | |
tree | ab4344aa2c0b776b637200f33daeb7f73e2f8f05 /tools/emacs-pkgs | |
parent | 12973b8a8bc596f99503ec12869383d0a6bb8221 (diff) |
chore(dottime.el): Remove advice for notmuch date rendering r/314
This code has moved into a patch for notmuch itself.
Diffstat (limited to 'tools/emacs-pkgs')
-rw-r--r-- | tools/emacs-pkgs/dottime/dottime.el | 21 |
1 files changed, 1 insertions, 20 deletions
diff --git a/tools/emacs-pkgs/dottime/dottime.el b/tools/emacs-pkgs/dottime/dottime.el index 508ee5b6937b..3500b1c9f489 100644 --- a/tools/emacs-pkgs/dottime/dottime.el +++ b/tools/emacs-pkgs/dottime/dottime.el @@ -77,25 +77,6 @@ (telega-ins-fmt "%02d·%02d" (nth 2 dtime) (nth 1 dtime)) (funcall orig timestamp)))) - (advice-add 'telega-ins--date :around #'telega-ins--dottime-advice)) - - ;; Amend the time display in notmuch to use dottime. - (when (featurep 'notmuch) - (require 'notmuch) - (defun notmuch-show--dottime-date-advice (orig header header-value) - (if (equal "Date" header) - ;; Unfortunately the header insertion functions do not have access - ;; to the message object, which means that the only information we - ;; have about the timestamp is its string rendering. - (-let* (((sec min hour day mon year dow dst tz) - (parse-time-string header-value))) - (insert header ": " - (dottime-format (encode-time sec min hour day mon year tz) - tz "%a, %Y-") - "\n")) - - (funcall orig header header-value))) - - (advice-add 'notmuch-show-insert-header :around #'notmuch-show--dottime-date-advice))) + (advice-add 'telega-ins--date :around #'telega-ins--dottime-advice))) (provide 'dottime) |