mirror of
https://gitlab.com/dwt1/dotfiles.git
synced 2026-04-23 11:30:23 +10:00
Moving to Doom Emacs!
This commit is contained in:
19
.emacs.d/modules/tools/gist/autoload/evil.el
Normal file
19
.emacs.d/modules/tools/gist/autoload/evil.el
Normal file
@@ -0,0 +1,19 @@
|
||||
;;; tools/gist/autoload/evil.el -*- lexical-binding: t; -*-
|
||||
;;;###if (featurep! :editor evil)
|
||||
|
||||
;;;###autoload (autoload '+gist:send "tools/gist/autoload/evil" nil t)
|
||||
(evil-define-operator +gist:send (bang)
|
||||
"Create a private gist from the buffer. If BANG then make it public."
|
||||
:type inclusive :repeat nil
|
||||
(interactive "<!>")
|
||||
(if bang
|
||||
(gist-region-or-buffer)
|
||||
(gist-region-or-buffer-private)))
|
||||
|
||||
;;;###autoload (autoload '+gist:list "tools/gist/autoload/evil" nil t)
|
||||
(evil-define-command +gist:list (&optional username)
|
||||
"Pop up a listing of gists."
|
||||
(interactive "<a>")
|
||||
(if username
|
||||
(gist-list-user username)
|
||||
(gist-list)))
|
||||
28
.emacs.d/modules/tools/gist/config.el
Normal file
28
.emacs.d/modules/tools/gist/config.el
Normal file
@@ -0,0 +1,28 @@
|
||||
;;; tools/gist/config.el -*- lexical-binding: t; -*-
|
||||
|
||||
;; NOTE On occasion, the cache gets corrupted, causing wrong-type-argument
|
||||
;; errors. If that happens, try `+gist/kill-cache'. You may have to restart
|
||||
;; Emacs.
|
||||
|
||||
(after! gist
|
||||
(set-evil-initial-state! 'gist-list-mode 'normal)
|
||||
|
||||
(set-popup-rule! "^\\*gist-" :ignore t)
|
||||
|
||||
(defadvice! +gist--open-in-popup-a (orig-fn &rest args)
|
||||
:around #'gist-list-render
|
||||
(funcall orig-fn (car args) t)
|
||||
(unless (cadr args)
|
||||
(pop-to-buffer (current-buffer))))
|
||||
|
||||
(map! :map gist-list-menu-mode-map
|
||||
:n "go" #'gist-browse-current-url
|
||||
:n "gr" #'gist-list-reload
|
||||
:n "c" #'gist-add-buffer
|
||||
:n "d" #'gist-kill-current
|
||||
:n "e" #'gist-edit-current-description
|
||||
:n "f" #'gist-fork
|
||||
:n "q" #'kill-current-buffer
|
||||
:n "s" #'gist-star
|
||||
:n "S" #'gist-unstar
|
||||
:n "y" #'gist-print-current-url))
|
||||
4
.emacs.d/modules/tools/gist/packages.el
Normal file
4
.emacs.d/modules/tools/gist/packages.el
Normal file
@@ -0,0 +1,4 @@
|
||||
;; -*- no-byte-compile: t; -*-
|
||||
;;; tools/gist/packages.el
|
||||
|
||||
(package! gist)
|
||||
Reference in New Issue
Block a user