Skip to content


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

bind gh-profile-current-profile in gist-mode

  • Loading branch information...
commit 8e2ae4ce65ad5c54707b08f05f648c9dcd3a9019 1 parent 5cefae0
@sigma sigma authored
Showing with 4 additions and 2 deletions.
  1. +4 −2 gist.el
6 gist.el
@@ -256,7 +256,8 @@ for the gist."
(let ((gist nil)
(multi nil)
(prefix (format "*gist %s*" id))
- (result nil))
+ (result nil)
+ (profile (gh-profile-current-profile)))
(dolist (g gist-list-db)
(when (string= (oref g :id) id)
(setq gist g)))
@@ -286,7 +287,8 @@ for the gist."
;; set minor mode
(gist-mode 1)
(setq gist-id id
- gist-filename fname))
+ gist-filename fname
+ gh-profile-current-profile profile))
(set-buffer-modified-p nil))
(setq result buffer))))
(if multi
Please sign in to comment.
Something went wrong with that request. Please try again.