From 3fff0415665b5bec899db88e31911f94babc1d02 Mon Sep 17 00:00:00 2001 From: Miguel de la Cruz Date: Wed, 9 Oct 2024 17:55:40 +0200 Subject: [PATCH] Initial commit --- README.md | 3 +++ beholder.el | 18 ++++++++++++++++++ 2 files changed, 21 insertions(+) create mode 100644 README.md create mode 100644 beholder.el diff --git a/README.md b/README.md new file mode 100644 index 0000000..815c41a --- /dev/null +++ b/README.md @@ -0,0 +1,3 @@ +# Beholder + +Control your GitHub pending entities from a single mode. diff --git a/beholder.el b/beholder.el new file mode 100644 index 0000000..2ae9c0b --- /dev/null +++ b/beholder.el @@ -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)