mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix(emacs-pkgs/dottime): Do not call telega macros in advice setup

Browse source 
This advice is potentially defined before the autoloads for telega
have run, which means that the macro-expansion fails and
`telega-ins-fmt` is looked up as a function.

With this setup the initialisation works as expected.
This commit is contained in:
Vincent Ambo 2020-01-19 16:48:11 +00:00
parent f09c6a8ecd
commit 9879703155
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
tools/emacs-pkgs/dottime/dottime.el
View file

@ -67,14 +67,13 @@
;; This will never display offsets in the chat window, as those are
;; always visible in the modeline anyways.
(when (featurep 'telega)
(require 'telega)
(defun telega-ins--dottime-advice (orig timestamp)
(let* ((dtime (decode-time timestamp t))
(current-ts (time-to-seconds (current-time)))
(ctime (decode-time current-ts))
(today00 (telega--time-at00 current-ts ctime)))
(if (> timestamp today00)
(telega-ins-fmt "%02d·%02d" (nth 2 dtime) (nth 1 dtime))
(telega-ins (format "%02d·%02d" (nth 2 dtime) (nth 1 dtime)))
(funcall orig timestamp))))
(advice-add 'telega-ins--date :around #'telega-ins--dottime-advice)))