tools/gist: conform to new conventions

This commit is contained in:
Henrik Lissner 2019-07-22 23:35:25 +02:00
parent 287e61a72c
commit a264185f74
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -9,8 +9,8 @@
(set-popup-rule! "^\\*gist-" :ignore t)
(defun +gist*list-render (orig-fn &rest args)
(def-advice! +gist-list-render-a (orig-fn &rest args)
:around #'gist-list-render
(funcall orig-fn (car args) t)
(unless (cadr args)
(pop-to-buffer (current-buffer))))
(advice-add #'gist-list-render :around #'+gist*list-render))
(pop-to-buffer (current-buffer)))))