Skip to content

Commit

Permalink
allow fetching without selecting buffer
Browse files Browse the repository at this point in the history
  • Loading branch information
sigma committed Dec 30, 2014
1 parent e9703ed commit ff58d6e
Showing 1 changed file with 7 additions and 0 deletions.
7 changes: 7 additions & 0 deletions gist.el
Original file line number Diff line number Diff line change
Expand Up @@ -357,6 +357,12 @@ for the gist."
(interactive)
(gist-fetch (tabulated-list-get-id)))

(defun gist-fetch-current-noselect ()
(interactive)
(let ((win (selected-window)))
(gist-fetch-current)
(select-window win)))

(defun gist-edit-current-description ()
(interactive)
(let* ((id (tabulated-list-get-id))
Expand Down Expand Up @@ -440,6 +446,7 @@ put it into `kill-ring'."
(let ((map (make-sparse-keymap)))
(set-keymap-parent map tabulated-list-mode-map)
(define-key map "\C-m" 'gist-fetch-current)
(define-key map [tab] 'gist-fetch-current-noselect)
(define-key map "g" 'gist-list-reload)
(define-key map "e" 'gist-edit-current-description)
(define-key map "k" 'gist-kill-current)
Expand Down

0 comments on commit ff58d6e

Please sign in to comment.