diff options
author | gearnode <bryan@frimin.fr> | 2020-08-06 15:02:26 +0200 |
---|---|---|
committer | gearnode <bryan@frimin.fr> | 2020-08-06 15:02:26 +0200 |
commit | e8e24cab9cb4565322174ccd9b7cb01e740b83e5 (patch) | |
tree | e2b84b864de02f75500bab6932883a8d6f21c5fd | |
parent | dbe3bfe244b1d2fee8558e0e973ec92cce45d5d8 (diff) |
configure hl-todo
-rw-r--r-- | README.org | 10 | ||||
-rw-r--r-- | init.el | 2 | ||||
-rw-r--r-- | packages/archives/melpa/archive-contents | 12 | ||||
-rw-r--r-- | packages/hl-todo-20200804.705/hl-todo-autoloads.el | 81 | ||||
-rw-r--r-- | packages/hl-todo-20200804.705/hl-todo-pkg.el | 2 | ||||
-rw-r--r-- | packages/hl-todo-20200804.705/hl-todo.el | 357 | ||||
-rw-r--r-- | packages/hl-todo-20200804.705/hl-todo.elc | bin | 0 -> 15405 bytes |
7 files changed, 457 insertions, 7 deletions
@@ -195,3 +195,13 @@ Display line number in the gutter. (require 'helm-projectile) (helm-projectile-on) #+END_SRC + +*** hl-todo +#+BEGIN_SRC emacs-lisp +(global-hl-todo-mode) + +(setq hl-todo-keyword-faces + '(("TODO" . "#FF0000") + ("DEBUG" . "#1E90FF") + ("XXX" . "#1E90FF"))) +#+END_SRC @@ -25,7 +25,7 @@ '(custom-enabled-themes (quote (tango-dark))) '(package-selected-packages (quote - (helm-projectile projectile nginx-mode dockerfile-mode yasnippet ztree company-quickhelp exec-path-from-shell terraform-mode helm-ag json-mode forge elixir-mode erlang disable-mouse company-go company protobuf-mode yaml-mode markdown-mode go-mode org-plus-contrib org magit helm)))) + (hl-todo helm-projectile projectile nginx-mode dockerfile-mode yasnippet ztree company-quickhelp exec-path-from-shell terraform-mode helm-ag json-mode forge elixir-mode erlang disable-mouse company-go company protobuf-mode yaml-mode markdown-mode go-mode org-plus-contrib org magit helm)))) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. diff --git a/packages/archives/melpa/archive-contents b/packages/archives/melpa/archive-contents index 041fb12..c7dd054 100644 --- a/packages/archives/melpa/archive-contents +++ b/packages/archives/melpa/archive-contents @@ -419,7 +419,7 @@ (centimacro . [(20140306 1427) nil "Assign multiple macros as global key bindings" single ((:commit . "1b97a9b558ed9c49d5da1bfbf29b2506575c2742") (:keywords "macros") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com") (:url . "https://github.com/abo-abo/centimacro"))]) (cerbere . [(20181113 1641) ((pkg-info (0 5))) "Unit testing in Emacs for several programming languages" tar ((:commit . "c667c165d9c1657f13d2d46f09ba21b61f9402cc") (:keywords "python" "go" "php" "phpunit" "elisp" "ert" "tests" "tdd") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com") (:url . "https://github.com/nlamirault/cerbere"))]) (ceylon-mode . [(20180606 1324) ((emacs (25))) "Major mode for editing Ceylon source code" single ((:commit . "948515672bc596dc118e8e3ede3ede5ec6a3c95a") (:keywords "languages" "ceylon") (:authors ("Lucas Werkmeister" . "mail@lucaswerkmeister.de")) (:maintainer "Lucas Werkmeister" . "mail@lucaswerkmeister.de") (:url . "https://github.com/lucaswerkmeister/ceylon-mode"))]) - (cfengine-code-style . [(20171115 2108) nil "C code style for CFEngine project." single ((:commit . "f78761aa25ff80d8888997fbbbbc84a2ecfd384d") (:authors ("Mikhail Gusarov" . "mikhail.gusarov@cfengine.com")) (:maintainer "Mikhail Gusarov" . "mikhail.gusarov@cfengine.com") (:url . "https://github.com/cfengine/core"))]) + (cfengine-code-style . [(20171115 2108) nil "C code style for CFEngine project." single ((:commit . "2936695b2048cd3dc4999c1ada00ff384aa8515d") (:authors ("Mikhail Gusarov" . "mikhail.gusarov@cfengine.com")) (:maintainer "Mikhail Gusarov" . "mikhail.gusarov@cfengine.com") (:url . "https://github.com/cfengine/core"))]) (cff . [(20160118 2018) ((cl-lib (0 5)) (emacs (24))) "Search of the C/C++ file header by the source and vice versa" single ((:commit . "b6ab2a28e64ef06f281ec74cfe3114e450644dfa") (:keywords "find-file") (:authors ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainer "Alexey Veretennikov" . "alexey.veretennikov@gmail.com") (:url . "https://github.com/fourier/cff"))]) (cfml-mode . [(20190617 1130) ((emacs (25))) "Emacs mode for editing CFML files" single ((:commit . "b06d7cee2af0ed5d55a94f0db80fc1f429a1829a") (:authors ("Andrew Myers" . "am2605@gmail.com")) (:maintainer "Andrew Myers" . "am2605@gmail.com") (:url . "https://github.com/am2605/cfml-mode"))]) (cframe . [(20190616 1946) ((emacs (25)) (buffer-manage (0 9)) (dash (2 13 0))) "customize a frame and fast switch size and positions" single ((:commit . "38026cbd004231c5525bea31723ced39311bb408") (:keywords "frame" "customize") (:authors ("Paul Landes")) (:maintainer "Paul Landes") (:url . "https://github.com/plandes/cframe"))]) @@ -727,7 +727,7 @@ (dakrone-theme . [(20170801 1933) nil "dakrone's custom dark theme" single ((:commit . "232ad1be5f3572dcbdf528f1655109aa355a6937") (:keywords "color" "themes") (:authors ("Lee Hinman <lee _AT_ writequit.org>")) (:maintainer "Lee Hinman <lee _AT_ writequit.org>") (:url . "https://github.com/dakrone/dakrone-theme"))]) (danneskjold-theme . [(20200724 1525) nil "Beautiful high-contrast Emacs theme." tar ((:commit . "5b458ce976acf948aa101a05994b68baf9b01846"))]) (dante . [(20200416 1217) ((dash (2 12 0)) (emacs (25 1)) (f (0 19 0)) (flycheck (0 30)) (company (0 9)) (haskell-mode (13 14)) (s (1 11 0)) (lcr (1 0))) "Development mode for Haskell" single ((:commit . "c516bc9e8f09e0f928de9a93e82acfb382636f5c") (:keywords "haskell" "tools") (:authors ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainer "Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com") (:url . "https://github.com/jyp/dante"))]) - (dap-mode . [(20200805 1310) ((emacs (26 1)) (dash (2 14 1)) (lsp-mode (6 0)) (dash-functional (1 2 0)) (bui (1 1 0)) (f (0 20 0)) (s (1 12 0)) (lsp-treemacs (0 1)) (posframe (0 7 0))) "Debug Adapter Protocol mode" tar ((:commit . "35940388db237a8246bb2c320ea8001c87352997") (:keywords "languages" "debug") (:authors ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainer "Ivan Yonchovski" . "yyoncho@gmail.com") (:url . "https://github.com/yyoncho/dap-mode"))]) + (dap-mode . [(20200806 922) ((emacs (26 1)) (dash (2 14 1)) (lsp-mode (6 0)) (dash-functional (1 2 0)) (bui (1 1 0)) (f (0 20 0)) (s (1 12 0)) (lsp-treemacs (0 1)) (posframe (0 7 0))) "Debug Adapter Protocol mode" tar ((:commit . "85a61630499bb836bdb378fb62ea4ddd4f61a2dd") (:keywords "languages" "debug") (:authors ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainer "Ivan Yonchovski" . "yyoncho@gmail.com") (:url . "https://github.com/yyoncho/dap-mode"))]) (darcsum . [(20190316 2215) nil "a pcl-cvs like interface for managing darcs patches" single ((:commit . "6a8b690539d133c5e3d17cb23fe4365fbb6fb493") (:keywords "completion" "convenience" "tools" "vc") (:authors ("John Wiegley" . "johnw@gnu.org")) (:maintainer "John Wiegley" . "johnw@gnu.org"))]) (darcula-theme . [(20171227 1845) nil "Inspired by IntelliJ's Darcula theme" single ((:commit . "d9b82b58ded9014985be6658f4ab17e26ed9e93e") (:keywords "faces") (:authors ("Sam Halliday" . "Sam.Halliday@gmail.com")) (:maintainer "Sam Halliday" . "Sam.Halliday@gmail.com") (:url . "https://gitlab.com/fommil/emacs-darcula-theme"))]) (dark-krystal-theme . [(20170808 1300) ((emacs (24 0))) "an Emacs 24 theme based on Dark Krystal (tmTheme)" single ((:commit . "79084b99665dc9ffb0ec62cc092349a5ecebebbc") (:authors ("Jason Milkins")) (:maintainer "Jason Milkins") (:url . "https://github.com/emacsfodder/tmtheme-to-deftheme"))]) @@ -1208,7 +1208,7 @@ (evil-cleverparens . [(20170718 413) ((evil (1 0)) (paredit (1)) (smartparens (1 6 1)) (emacs (24 4)) (dash (2 12 0))) "Evil friendly minor-mode for editing lisp." tar ((:commit . "8c45879d49bfa6d4e414b6c1df700a4a51cbb869") (:keywords "cleverparens" "parentheses" "evil" "paredit" "smartparens") (:authors ("Olli Piepponen" . "opieppo@gmail.com")) (:maintainer "Olli Piepponen" . "opieppo@gmail.com") (:url . "https://github.com/luxbock/evil-cleverparens"))]) (evil-colemak-basics . [(20200630 1936) ((emacs (24 3)) (evil (1 2 12)) (evil-snipe (2 0 3))) "Basic Colemak key bindings for evil-mode" single ((:commit . "dcdf5c3e844f6eef2bf9d6a502cf8c81b3edaff2") (:keywords "convenience" "emulations" "colemak" "evil") (:authors ("Wouter Bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "Wouter Bolsterlee" . "wouter@bolsterl.ee") (:url . "https://github.com/wbolster/evil-colemak-basics"))]) (evil-colemak-minimal . [(20171006 1317) ((emacs (24)) (evil (1 2 12))) "Minimal Colemak key bindings for evil-mode" single ((:commit . "6d98b6da60f414524a0d718f76024c26dce742b3") (:keywords "colemak" "evil") (:authors ("Bryan Allred" . "bryan@revolvingcow.com")) (:maintainer "Bryan Allred" . "bryan@revolvingcow.com") (:url . "https://github.com/bmallred/evil-colemak-minimal"))]) - (evil-collection . [(20200805 1624) ((emacs (25 1)) (evil (1 2 13)) (annalist (1 0))) "A set of keybindings for Evil mode" tar ((:commit . "d1ad840c694a8fd92e0d9b88129c98cf9ea7b429") (:keywords "evil" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com") (:url . "https://github.com/emacs-evil/evil-collection"))]) + (evil-collection . [(20200806 755) ((emacs (25 1)) (evil (1 2 13)) (annalist (1 0))) "A set of keybindings for Evil mode" tar ((:commit . "f26ef21a8fae5abb6a137199fbef1b7e2de9e44b") (:keywords "evil" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com") (:url . "https://github.com/emacs-evil/evil-collection"))]) (evil-commentary . [(20170413 1451) ((evil (1 0 0))) "Comment stuff out. A port of vim-commentary." tar ((:commit . "395f91014b69844b81660c155f42eb9b1b3d199d") (:keywords "evil" "comment" "commentary" "evil-commentary") (:authors ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainer "Quang Linh LE" . "linktohack@gmail.com") (:url . "http://github.com/linktohack/evil-commentary"))]) (evil-dvorak . [(20160416 1841) ((evil (1 0 8))) "evil keybindings for that work with dvorak mode" tar ((:commit . "824f7c56980d72a0ff04c662223540cd66f13754") (:keywords "evil" "vim-emulation" "dvorak" "keyboard") (:url . "https://github.com/jbranso/evil-dvorak.git"))]) (evil-easymotion . [(20200424 135) ((emacs (24)) (avy (0 3 0)) (cl-lib (0 5))) "A port of vim's easymotion to emacs" single ((:commit . "f96c2ed38ddc07908db7c3c11bcd6285a3e8c2e9") (:keywords "convenience" "evil") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com") (:url . "https://github.com/pythonnut/evil-easymotion"))]) @@ -1571,7 +1571,7 @@ (forth-mode . [(20170527 1930) nil "Programming language mode for Forth" tar ((:commit . "522256d98d1a909983bcfd3ae20c65226d5929b6") (:keywords "languages" "forth") (:authors ("Lars Brinkhoff" . "lars@nocrew.org")) (:maintainer "Lars Brinkhoff" . "lars@nocrew.org") (:url . "http://github.com/larsbrinkhoff/forth-mode"))]) (fortpy . [(20150715 2032) ((epc (0 1 0)) (auto-complete (1 4)) (python-environment (0 0 2)) (pos-tip (0 4 5))) "a Fortran auto-completion for Emacs" tar ((:commit . "c614517e9396ef7a78be3b8786fbf303879cf43b") (:authors ("Conrad Rosenbrock <rosenbrockc at gmail.com>")) (:maintainer "Conrad Rosenbrock <rosenbrockc at gmail.com>"))]) (fortune-cookie . [(20181223 842) nil "Print a fortune in your scratch buffer." single ((:commit . "6c1c08f5be83822c0b762872ab25e3dbee96f333") (:keywords "fortune" "cowsay" "scratch" "startup") (:authors ("Andrew Schwartzmeyer" . "andrew@schwartzmeyer.com")) (:maintainer "Andrew Schwartzmeyer" . "andrew@schwartzmeyer.com") (:url . "https://github.com/andschwa/fortune-cookie"))]) - (fountain-mode . [(20200805 312) ((emacs (24 4)) (seq (2 20))) "Major mode for screenwriting in Fountain markup" single ((:commit . "a37f6c955b2aef2260a44064a937e6165b3b0a42") (:keywords "wp" "text") (:authors ("William Rankin" . "william@bydasein.com")) (:maintainer "William Rankin" . "william@bydasein.com") (:url . "https://github.com/rnkn/fountain-mode"))]) + (fountain-mode . [(20200806 1227) ((emacs (24 4)) (seq (2 20))) "Major mode for screenwriting in Fountain markup" single ((:commit . "eea4452db965ddf5f02da2643e49833daa0f2568") (:keywords "wp" "text") (:authors ("William Rankin" . "william@bydasein.com")) (:maintainer "William Rankin" . "william@bydasein.com") (:url . "https://github.com/rnkn/fountain-mode"))]) (fraktur-mode . [(20160815 227) ((cl-lib (0 5))) "Easily insert Unicode mathematical Fraktur characters" single ((:commit . "514baf5546aed12a0d9fa0fe66e87cdcc7843b08") (:keywords "unicode" "fraktur" "math" "mathematical") (:authors ("Grant Rettke" . "gcr@wisdomandwonder.com")) (:maintainer nil . "<gcr@wisdomandwonder.com>") (:url . "https://github.com/grettke/fraktur-mode"))]) (frame-local . [(20180330 940) ((emacs (25 1))) "Variables local to a frame" single ((:commit . "7ee1106c3bcd4022f48421f8cb1ef4f995da816e") (:keywords "frames" "tools" "local" "lisp") (:authors ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainer "Sebastien Chapuis" . "sebastien@chapu.is") (:url . "https://github.com/sebastiencs/frame-local"))]) (frame-mode . [(20190710 2030) ((s (1 9 0)) (emacs (24 4))) "Use frames instead of windows" single ((:commit . "ae2366969927c9f89ea07c999bef382b0b47cac1") (:keywords "frames") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com") (:url . "https://github.com/IvanMalison/frame-mode"))]) @@ -2895,7 +2895,7 @@ (netherlands-holidays . [(20150202 1617) nil "Netherlands holidays for Emacs calendar." single ((:commit . "26236178cdd650df9958bf5a086e184096559f00") (:keywords "calendar") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com") (:url . "https://github.com/abo-abo/netherlands-holidays"))]) (netrunner . [(20160910 2332) ((popup (0 5 3)) (company (0 9 0)) (helm (1 9 5))) "Create Android: Netrunner decklists using Company, Helm and org-mode" single ((:commit . "c64672992175c8c1073c0f56c2e471839db71a0f") (:keywords "games") (:authors ("Erik Sjöstrand")) (:maintainer "Erik Sjöstrand") (:url . "http://github.com/Kungsgeten/netrunner"))]) (network-watch . [(20171123 1146) ((emacs (24 3))) "Support for intermittent network connectivity" single ((:commit . "958dd0d419e4f9402648a86b754091ba346e01b8") (:keywords "unix" "tools" "hardware" "lisp") (:authors ("Juan Amiguet Vercher" . "jamiguet@gmail.com")) (:maintainer "Juan Amiguet Vercher" . "jamiguet@gmail.com") (:url . "https://github.com/jamiguet/network-watch"))]) - (neuron-mode . [(20200805 1854) ((emacs (26 3)) (f (0 20 0)) (s (1 12 0)) (markdown-mode (2 3)) (company (0 9 13))) "Major mode for editing zettelkasten notes using neuron" single ((:commit . "3486183e5b2170234d71bf24d3f96bda40d09a75") (:keywords "outlines") (:authors ("felko <http://github/felko>")) (:maintainer "felko <http://github/felko>") (:url . "https://github.com/felko/neuron-mode"))]) + (neuron-mode . [(20200806 833) ((emacs (26 3)) (f (0 20 0)) (s (1 12 0)) (markdown-mode (2 3)) (company (0 9 13))) "Major mode for editing zettelkasten notes using neuron" single ((:commit . "18d230ce6b126fe7193db9c20ac93811ccfe779d") (:keywords "outlines") (:authors ("felko <http://github/felko>")) (:maintainer "felko <http://github/felko>") (:url . "https://github.com/felko/neuron-mode"))]) (never-comment . [(20140104 2207) nil "Never blocks are comment" single ((:commit . "74ded8f1e7f23240f5f6032d0451fb0a51733bc4") (:authors ("Scott Frazer")) (:maintainer "Toon Claes") (:url . "http://stackoverflow.com/a/4554658/89376"))]) (newlisp-mode . [(20160226 1545) nil "newLISP editing mode for Emacs" single ((:commit . "ac23be40c81a360988ab803d365f1510733f6db4") (:keywords "language" "lisp" "newlisp") (:authors ("KOBAYASHI Shigeru <shigeru.kb[at]gmail.com>")) (:maintainer "KOBAYASHI Shigeru <shigeru.kb[at]gmail.com>") (:url . "https://github.com/kosh04/newlisp-mode"))]) (nexus . [(20140114 1305) nil "REST Client for Nexus Maven Repository servers" tar ((:commit . "c46f499951b90839aa8683779fe43d8f01672a60") (:keywords "comm") (:authors ("Juergen Hoetzel" . "juergen@archlinux.org")) (:maintainer "Juergen Hoetzel" . "juergen@archlinux.org"))]) @@ -3850,7 +3850,7 @@ (select-themes . [(20160221 106) nil "Color theme selection with completing-read" single ((:commit . "236f54287519a3ea6dd7b3992d053e4f4ff5d0fe") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com") (:url . "https://github.com/jasonm23/emacs-select-themes"))]) (selected . [(20200528 606) nil "Keymap for when region is active" single ((:commit . "3043fd2609f7e71d809763ae6e8dd4b6c904e63d") (:keywords "convenience") (:authors ("Erik Sjöstrand")) (:maintainer "Erik Sjöstrand") (:url . "http://github.com/Kungsgeten/selected.el"))]) (selectric-mode . [(20200209 2107) nil "IBM Selectric mode for Emacs" tar ((:commit . "bb9e66678f34e9bc23624ff6292cf5e7857e8e5f") (:keywords "multimedia" "convenience" "typewriter" "selectric") (:authors ("Ricardo Bánffy" . "rbanffy@gmail.com")) (:maintainer "Ricardo Banffy" . "rbanffy@gmail.com") (:url . "https://github.com/rbanffy/selectric-mode"))]) - (selectrum . [(20200805 1414) ((emacs (25 1))) "Easily select item from list" tar ((:commit . "b85d3846d0c46f137423b241e38cb814df691aa0") (:keywords "extensions") (:authors ("Radon Rosborough" . "radon.neon@gmail.com")) (:maintainer "Radon Rosborough" . "radon.neon@gmail.com") (:url . "https://github.com/raxod502/selectrum"))]) + (selectrum . [(20200806 812) ((emacs (25 1))) "Easily select item from list" tar ((:commit . "b14a7e29d80ab14a8c55763a743cb4f451bc1e34") (:keywords "extensions") (:authors ("Radon Rosborough" . "radon.neon@gmail.com")) (:maintainer "Radon Rosborough" . "radon.neon@gmail.com") (:url . "https://github.com/raxod502/selectrum"))]) (selectrum-prescient . [(20200716 1414) ((emacs (25 1)) (prescient (5 0)) (selectrum (1 0))) "Selectrum integration" single ((:commit . "b11d79b10df12c58edc3487371c2c47dfb9b50e6") (:keywords "extensions") (:authors ("Radon Rosborough" . "radon.neon@gmail.com")) (:maintainer "Radon Rosborough" . "radon.neon@gmail.com") (:url . "https://github.com/raxod502/prescient.el"))]) (semaphore . [(20190607 1949) ((emacs (26))) "Semaphore based on condition variables" single ((:commit . "a069b69018b96d284ce7553cd63350a88ea3679c") (:keywords "processes" "unix") (:authors ("Herwig Hochleitner" . "herwig@bendlas.net")) (:maintainer "Herwig Hochleitner" . "herwig@bendlas.net") (:url . "http://github.com/webnf/semaphore.el"))]) (semaphore-promise . [(20190607 2115) ((emacs (26)) (semaphore (1)) (promise (1))) "semaphore integration with promise" single ((:commit . "a069b69018b96d284ce7553cd63350a88ea3679c") (:keywords "processes" "unix") (:authors ("Herwig Hochleitner" . "herwig@bendlas.net")) (:maintainer "Herwig Hochleitner" . "herwig@bendlas.net") (:url . "http://github.com/webnf/semaphore.el"))]) diff --git a/packages/hl-todo-20200804.705/hl-todo-autoloads.el b/packages/hl-todo-20200804.705/hl-todo-autoloads.el new file mode 100644 index 0000000..98e44ab --- /dev/null +++ b/packages/hl-todo-20200804.705/hl-todo-autoloads.el @@ -0,0 +1,81 @@ +;;; hl-todo-autoloads.el --- automatically extracted autoloads +;; +;;; Code: + +(add-to-list 'load-path (directory-file-name + (or (file-name-directory #$) (car load-path)))) + + +;;;### (autoloads nil "hl-todo" "hl-todo.el" (0 0 0 0)) +;;; Generated autoloads from hl-todo.el + +(autoload 'hl-todo-mode "hl-todo" "\ +Highlight TODO and similar keywords in comments and strings. + +\(fn &optional ARG)" t nil) + +(defvar global-hl-todo-mode nil "\ +Non-nil if Global Hl-Todo mode is enabled. +See the `global-hl-todo-mode' command +for a description of this minor mode. +Setting this variable directly does not take effect; +either customize it (see the info node `Easy Customization') +or call the function `global-hl-todo-mode'.") + +(custom-autoload 'global-hl-todo-mode "hl-todo" nil) + +(autoload 'global-hl-todo-mode "hl-todo" "\ +Toggle Hl-Todo mode in all buffers. +With prefix ARG, enable Global Hl-Todo mode if ARG is positive; +otherwise, disable it. If called from Lisp, enable the mode if +ARG is omitted or nil. + +Hl-Todo mode is enabled in all buffers where +`hl-todo--turn-on-mode-if-desired' would do it. +See `hl-todo-mode' for more information on Hl-Todo mode. + +\(fn &optional ARG)" t nil) + +(autoload 'hl-todo-next "hl-todo" "\ +Jump to the next TODO or similar keyword. +The prefix argument ARG specifies how many keywords to move. +A negative argument means move backward that many keywords. + +\(fn ARG)" t nil) + +(autoload 'hl-todo-previous "hl-todo" "\ +Jump to the previous TODO or similar keyword. +The prefix argument ARG specifies how many keywords to move. +A negative argument means move forward that many keywords. + +\(fn ARG)" t nil) + +(autoload 'hl-todo-occur "hl-todo" "\ +Use `occur' to find all TODO or similar keywords. +This actually finds a superset of the highlighted keywords, +because it uses a regexp instead of a more sophisticated +matcher. It also finds occurrences that are not within a +string or comment. + +\(fn)" t nil) + +(autoload 'hl-todo-insert "hl-todo" "\ +Insert TODO or similar keyword. +If point is not inside a string or comment, then insert a new +comment. If point is at the end of the line, then insert the +comment there, otherwise insert it as a new line before the +current line. + +\(fn KEYWORD)" t nil) + +(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "hl-todo" '("hl-todo-"))) + +;;;*** + +;; Local Variables: +;; version-control: never +;; no-byte-compile: t +;; no-update-autoloads: t +;; coding: utf-8 +;; End: +;;; hl-todo-autoloads.el ends here diff --git a/packages/hl-todo-20200804.705/hl-todo-pkg.el b/packages/hl-todo-20200804.705/hl-todo-pkg.el new file mode 100644 index 0000000..8ddc0c9 --- /dev/null +++ b/packages/hl-todo-20200804.705/hl-todo-pkg.el @@ -0,0 +1,2 @@ +;;; -*- no-byte-compile: t -*- +(define-package "hl-todo" "20200804.705" "highlight TODO and similar keywords" '((emacs "25")) :commit "8d0adfe2e1c176e197f41bc048875ff9bdde0ee2" :keywords '("convenience") :authors '(("Jonas Bernoulli" . "jonas@bernoul.li")) :maintainer '("Jonas Bernoulli" . "jonas@bernoul.li") :url "https://github.com/tarsius/hl-todo") diff --git a/packages/hl-todo-20200804.705/hl-todo.el b/packages/hl-todo-20200804.705/hl-todo.el new file mode 100644 index 0000000..f9501c9 --- /dev/null +++ b/packages/hl-todo-20200804.705/hl-todo.el @@ -0,0 +1,357 @@ +;;; hl-todo.el --- highlight TODO and similar keywords -*- lexical-binding: t -*- + +;; Copyright (C) 2013-2020 Jonas Bernoulli + +;; Author: Jonas Bernoulli <jonas@bernoul.li> +;; Homepage: https://github.com/tarsius/hl-todo +;; Keywords: convenience +;; Package-Version: 20200804.705 +;; Package-Commit: 8d0adfe2e1c176e197f41bc048875ff9bdde0ee2 + +;; Package-Requires: ((emacs "25")) + +;; This file is not part of GNU Emacs. + +;; This file is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation; either version 3, or (at your option) +;; any later version. + +;; This file is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; For a full copy of the GNU General Public License +;; see <http://www.gnu.org/licenses/>. + +;;; Commentary: + +;; Highlight TODO and similar keywords in comments and strings. + +;; You can either explicitly turn on `hl-todo-mode' in certain buffers +;; or use the the global variant `global-hl-todo-mode', which enables +;; the local mode based on each buffer's major-mode and the options +;; `hl-todo-include-modes' and `hl-todo-exclude-modes'. By default +;; `hl-todo-mode' is enabled for all buffers whose major-mode derive +;; from either `prog-mode' or `text-mode', except `org-mode'. + +;; This package also provides commands for moving to the next or +;; previous keyword, to invoke `occur' with a regexp that matches all +;; known keywords, and to insert a keyword. If you want to use these +;; commands, then you should bind them in `hl-todo-mode-map', e.g.: +;; +;; (define-key hl-todo-mode-map (kbd "C-c p") 'hl-todo-previous) +;; (define-key hl-todo-mode-map (kbd "C-c n") 'hl-todo-next) +;; (define-key hl-todo-mode-map (kbd "C-c o") 'hl-todo-occur) +;; (define-key hl-todo-mode-map (kbd "C-c i") 'hl-todo-insert) + +;; See [[https://www.emacswiki.org/emacs/FixmeMode][this list]] on the Emacswiki for other packages that implement +;; the same basic features, but which might also provide additional +;; features that you might like, but which I don't deem necessary. + +;;; Code: + +(require' cl-lib) + +(eval-when-compile + (require 'subr-x)) + +(defgroup hl-todo nil + "Highlight TODO and similar keywords in comments and strings." + :group 'font-lock-extra-types) + +(defface hl-todo + '((t (:bold t :foreground "#cc9393"))) + "Base face used to highlight TODO and similar keywords. +The faces used to highlight certain keywords are, by default, +created by inheriting this face and using the appropriate +color specified using the option `hl-todo-keyword-faces' as +foreground color." + :group 'hl-todo) + +(define-obsolete-variable-alias 'hl-todo-activate-in-modes + 'hl-todo-include-modes "hl-todo 3.1.0") + +(defcustom hl-todo-include-modes '(prog-mode text-mode) + "Major-modes in which `hl-todo-mode' is activated. + +This is used by `global-hl-todo-mode', which activates the local +`hl-todo-mode' in all buffers whose major-mode derive from one +of the modes listed here, but not from one of the modes listed +in `hl-todo-exclude-modes'." + :package-version '(hl-todo . "2.1.0") + :group 'hl-todo + :type '(repeat function)) + +(defcustom hl-todo-exclude-modes '(org-mode) + "Major-modes in which `hl-todo-mode' is not activated. + +This is used by `global-hl-todo-mode', which activates the local +`hl-todo-mode' in all buffers whose major-mode derived from one +of the modes listed in `hl-todo-include-modes', but not from one +of the modes listed here." + :package-version '(hl-todo . "3.1.0") + :group 'hl-todo + :type '(repeat function)) + +(defcustom hl-todo-text-modes '(text-mode) + "Major-modes that are considered text-modes. + +In buffers whose major-mode derives from one of the modes listed +here TODO keywords are always highlighted even if they are not +located inside a string." + :package-version '(hl-todo . "2.1.0") + :group 'hl-todo + :type '(repeat function)) + +(defcustom hl-todo-keyword-faces + '(("HOLD" . "#d0bf8f") + ("TODO" . "#cc9393") + ("NEXT" . "#dca3a3") + ("THEM" . "#dc8cc3") + ("PROG" . "#7cb8bb") + ("OKAY" . "#7cb8bb") + ("DONT" . "#5f7f5f") + ("FAIL" . "#8c5353") + ("DONE" . "#afd8af") + ("NOTE" . "#d0bf8f") + ("KLUDGE" . "#d0bf8f") + ("HACK" . "#d0bf8f") + ("TEMP" . "#d0bf8f") + ("FIXME" . "#cc9393") + ("XXX+" . "#cc9393")) + "An alist mapping keywords to colors/faces used to display them. + +Each entry has the form (KEYWORD . COLOR). KEYWORD is used as +part of a regular expression. If (regexp-quote KEYWORD) is not +equal to KEYWORD, then it is ignored by `hl-todo-insert-keyword'. +Instead of a color (a string), each COLOR may alternatively be a +face. + +The syntax class of the characters at either end has to be `w' +\(which means word) in `hl-todo--syntax-table'. That syntax +table derives from `text-mode-syntax-table' but uses `w' as the +class of \"?\". + +This package, like most of Emacs, does not use POSIX regexp +backtracking. See info node `(elisp)POSIX Regexp' for why that +matters. If you have two keywords \"TODO-NOW\" and \"TODO\", then +they must be specified in that order. Alternatively you could +use \"TODO\\(-NOW\\)?\"." + :package-version '(hl-todo . "3.0.0") + :group 'hl-todo + :type '(repeat (cons (string :tag "Keyword") + (choice :tag "Face " + (string :tag "Color") + (sexp :tag "Face"))))) + +(defcustom hl-todo-color-background nil + "Whether to emphasize keywords using the background color. + +If an entry in `hl-todo-keyword-faces' specifies a face, then the +respective keyword is displayed using exactly that face. In that +case this option is irrelevant. + +Otherwise, if an entry specifies only a color, then the `hl-todo' +face controls the appearance of the respective keyword, except +for either the foreground or the background color. This option +controls which of the two it is." + :package-version '(hl-todo . "3.1.0") + :group 'hl-todo + :type 'boolean) + +(defcustom hl-todo-highlight-punctuation "" + "String of characters to highlight after keywords. + +Each of the characters appearing in this string is highlighted +using the same face as the preceding keyword when it directly +follows the keyword. + +Characters whose syntax class is `w' (which means word), +including alphanumeric characters, cannot be used here." + :package-version '(hl-todo . "2.0.0") + :group 'hl-todo + :type 'string) + +(defvar-local hl-todo--regexp nil) +(defvar-local hl-todo--keywords nil) + +(defun hl-todo--regexp () + (or hl-todo--regexp (hl-todo--setup-regexp))) + +(defun hl-todo--setup-regexp () + (when-let ((bomb (assoc "???" hl-todo-keyword-faces))) + ;; If the user customized this variable before we started to + ;; treat the strings as regexps, then the string "???" might + ;; still be present. We have to remove it because it results + ;; in the regexp search taking forever. + (setq hl-todo-keyword-faces (delete bomb hl-todo-keyword-faces))) + (setq hl-todo--regexp + (concat "\\(\\<" + "\\(" (mapconcat #'car hl-todo-keyword-faces "\\|") "\\)" + "\\>" + (and (not (equal hl-todo-highlight-punctuation "")) + (concat "[" hl-todo-highlight-punctuation "]*")) + "\\)"))) + +(defun hl-todo--setup () + (hl-todo--setup-regexp) + (setq hl-todo--keywords + `(((lambda (bound) (hl-todo--search nil bound)) + (1 (hl-todo--get-face) t t)))) + (font-lock-add-keywords nil hl-todo--keywords t)) + +(defvar hl-todo--syntax-table (copy-syntax-table text-mode-syntax-table)) + +(defun hl-todo--search (&optional regexp bound backward) + (unless regexp + (setq regexp hl-todo--regexp)) + (cl-block nil + (while (let ((case-fold-search nil)) + (with-syntax-table hl-todo--syntax-table + (funcall (if backward #'re-search-backward #'re-search-forward) + regexp bound t))) + (cond ((or (apply #'derived-mode-p hl-todo-text-modes) + (hl-todo--inside-comment-or-string-p)) + (cl-return t)) + ((and bound (funcall (if backward #'<= #'>=) (point) bound)) + (cl-return nil)))))) + +(defun hl-todo--inside-comment-or-string-p () + (nth 8 (syntax-ppss))) + +(defun hl-todo--get-face () + (let ((keyword (match-string 2))) + (hl-todo--combine-face + (cdr (cl-find-if (lambda (elt) + (string-match-p (format "\\`%s\\'" (car elt)) + keyword)) + hl-todo-keyword-faces))))) + +(defun hl-todo--combine-face (face) + (if (stringp face) + (list :inherit 'hl-todo + (if hl-todo-color-background :background :foreground) + face) + face)) + +(defvar hl-todo-mode-map (make-sparse-keymap) + "Keymap for `hl-todo-mode'.") + +;;;###autoload +(define-minor-mode hl-todo-mode + "Highlight TODO and similar keywords in comments and strings." + :lighter "" + :keymap hl-todo-mode-map + :group 'hl-todo + (if hl-todo-mode + (hl-todo--setup) + (font-lock-remove-keywords nil hl-todo--keywords)) + (when font-lock-mode + (save-excursion + (goto-char (point-min)) + (while (hl-todo--search) + (save-excursion + (font-lock-fontify-region (match-beginning 0) (match-end 0) nil)))))) + +;;;###autoload +(define-globalized-minor-mode global-hl-todo-mode + hl-todo-mode hl-todo--turn-on-mode-if-desired) + +(defun hl-todo--turn-on-mode-if-desired () + (when (and (apply #'derived-mode-p hl-todo-include-modes) + (not (apply #'derived-mode-p hl-todo-exclude-modes))) + (hl-todo-mode 1))) + +;;;###autoload +(defun hl-todo-next (arg) + "Jump to the next TODO or similar keyword. +The prefix argument ARG specifies how many keywords to move. +A negative argument means move backward that many keywords." + (interactive "p") + (if (< arg 0) + (hl-todo-previous (- arg)) + (while (and (> arg 0) + (not (eobp)) + (progn + (when (let ((case-fold-search nil)) + (looking-at (hl-todo--regexp))) + (goto-char (match-end 0))) + (or (hl-todo--search) + (user-error "No more matches")))) + (cl-decf arg)))) + +;;;###autoload +(defun hl-todo-previous (arg) + "Jump to the previous TODO or similar keyword. +The prefix argument ARG specifies how many keywords to move. +A negative argument means move forward that many keywords." + (interactive "p") + (if (< arg 0) + (hl-todo-next (- arg)) + (while (and (> arg 0) + (not (bobp)) + (let ((start (point))) + (hl-todo--search (concat (hl-todo--regexp) "\\=") nil t) + (or (hl-todo--search nil nil t) + (progn (goto-char start) + (user-error "No more matches"))))) + (goto-char (match-end 0)) + (cl-decf arg)))) + +;;;###autoload +(defun hl-todo-occur () + "Use `occur' to find all TODO or similar keywords. +This actually finds a superset of the highlighted keywords, +because it uses a regexp instead of a more sophisticated +matcher. It also finds occurrences that are not within a +string or comment." + (interactive) + (with-syntax-table hl-todo--syntax-table + (occur (hl-todo--regexp)))) + +;;;###autoload +(defun hl-todo-insert (keyword) + "Insert TODO or similar keyword. +If point is not inside a string or comment, then insert a new +comment. If point is at the end of the line, then insert the +comment there, otherwise insert it as a new line before the +current line." + (interactive + (list (completing-read + "Insert keyword: " + (cl-mapcan (pcase-lambda (`(,keyword . ,face)) + (and (equal (regexp-quote keyword) keyword) + (list (propertize keyword 'face + (hl-todo--combine-face face))))) + hl-todo-keyword-faces)))) + (cond + ((hl-todo--inside-comment-or-string-p) + (insert (concat (and (not (memq (char-before) '(?\s ?\t))) " ") + keyword + (and (not (memq (char-after) '(?\s ?\t ?\n))) " ")))) + ((and (eolp) + (not (looking-back "^[\s\t]*" (line-beginning-position) t))) + (insert (concat (and (not (memq (char-before) '(?\s ?\t))) " ") + (format "%s %s " comment-start keyword)))) + (t + (goto-char (line-beginning-position)) + (insert (format "%s %s " + (if (derived-mode-p 'lisp-mode 'emacs-lisp-mode) + (format "%s%s" comment-start comment-start) + comment-start) + keyword)) + (unless (looking-at "[\s\t]*$") + (save-excursion (insert "\n"))) + (indent-region (line-beginning-position) (line-end-position))))) + +(define-obsolete-function-alias 'hl-todo-insert-keyword + 'hl-todo-insert "hl-todo 3.0.0") + +;;; _ +(provide 'hl-todo) +;; Local Variables: +;; indent-tabs-mode: nil +;; End: +;;; hl-todo.el ends here diff --git a/packages/hl-todo-20200804.705/hl-todo.elc b/packages/hl-todo-20200804.705/hl-todo.elc Binary files differnew file mode 100644 index 0000000..0f1c23b --- /dev/null +++ b/packages/hl-todo-20200804.705/hl-todo.elc |