Initial commit
This commit is contained in:
commit
3fff041566
2 changed files with 21 additions and 0 deletions
3
README.md
Normal file
3
README.md
Normal file
|
@ -0,0 +1,3 @@
|
||||||
|
# Beholder
|
||||||
|
|
||||||
|
Control your GitHub pending entities from a single mode.
|
18
beholder.el
Normal file
18
beholder.el
Normal file
|
@ -0,0 +1,18 @@
|
||||||
|
(define-derived-mode beholder-mode tabulated-list-mode "Beholder"
|
||||||
|
"Major mode for listing items awaiting action on GitHub."
|
||||||
|
|
||||||
|
(setq tabulated-list-format [("ID" 10 t) ("Title" 40 t) ("URL" 70 t)])
|
||||||
|
(setq tabulated-list-padding 2)
|
||||||
|
(tabulated-list-init-header)
|
||||||
|
(tablist-minor-mode))
|
||||||
|
|
||||||
|
(defun beholder ()
|
||||||
|
(interactive)
|
||||||
|
(pop-to-buffer "*beholder*" nil)
|
||||||
|
(beholder-mode)
|
||||||
|
(setq tabulated-list-entries '(("#123" ["#123" "My title" "https://one.go"])
|
||||||
|
("#231" ["#231" "My second" "https://two.go"])
|
||||||
|
("#312" ["#312" "My third" "https://three.go"])))
|
||||||
|
(tabulated-list-print t))
|
||||||
|
|
||||||
|
(provide 'beholder)
|
Loading…
Reference in a new issue