tre/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add revue category

Browse source
This commit is contained in:
mez 2025-06-23 20:21:34 +01:00
parent 778862669e
commit 42d61029a9
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
custom/capture.el
View file

@ -199,7 +199,7 @@
"Set a category for a website post" "Set a category for a website post"
(setq thecategory (completing-read "Category: " '("journal memes" "month" "reminding myself how to do stuff" "revues" "tumblr" "writing notes"))) (setq thecategory (completing-read "Category: " '("journal memes" "month" "reminding myself how to do stuff" "revues" "tumblr" "writing notes")))
(when (string-match "revues" thecategory) (when (string-match "revues" thecategory)
(setq revtype (completing-read "Type: " '("book" "game" "music" "sight"))) (setq revtype (completing-read "Type: " '("book" "event" "game" "music" "sight")))
(setq thecategory (concat thecategory "\n:type: " revtype))) (setq thecategory (concat thecategory "\n:type: " revtype)))
(when (string-match "tumblr" thecategory) (when (string-match "tumblr" thecategory)
(setq theop (read-string "OP username: ")) (setq theop (read-string "OP username: "))