doomemacs/modules/tools/wakatime/autoload.el

18 lines
563 B
EmacsLisp
Raw Normal View History

2018-06-08 00:33:00 +08:00
;;; tools/wakatime/autoload.el -*- lexical-binding: t; -*-
;;;###autoload
2018-06-13 07:50:09 +08:00
(add-hook 'doom-after-switch-buffer-hook #'+wakatime|autostart)
2018-06-08 00:33:00 +08:00
;;;###autoload
2018-06-13 07:50:09 +08:00
(defalias '+wakatime/start '+wakatime|autostart)
;;;###autoload
(defun +wakatime|autostart ()
2018-06-08 00:33:00 +08:00
"Initialize wakatime (if `wakatime-api-key' is set, otherwise no-op with a
warning)."
(interactive)
2018-06-09 21:43:39 +08:00
(if (boundp 'wakatime-api-key)
2018-06-08 00:33:00 +08:00
(global-wakatime-mode +1)
(message "No `wakatime-api-key' set! wakaktime-mode will stay disabled."))
(remove-hook 'doom-after-switch-buffer-hook #'+wakatime-init))