doomemacs/modules/tools/gist/autoload/gist.el

17 lines
486 B
EmacsLisp
Raw Normal View History

;;; tools/gist/autoload/gist.el -*- lexical-binding: t; -*-
2017-05-07 15:10:46 +02:00
;;;###autoload
(defun +gist/open-current ()
(interactive)
(gist-fetch-current)
2017-05-10 05:28:50 +02:00
(when-let (win (get-buffer-window "*github:gists*"))
(doom/popup-close win)))
2017-05-07 15:10:46 +02:00
;;;###autoload
(defun +gist/kill-cache ()
2017-05-10 05:28:50 +02:00
"Clears the gist cache. Necessary when a faulty cache causes gist.el to be
entirely unuseable."
2017-05-07 15:10:46 +02:00
(interactive)
(delete-directory (expand-file-name "gh" pcache-directory) t)
(message "gist.el cache cleared"))