From 42541d04288a362b3b3446a399216f5d7c9babea Mon Sep 17 00:00:00 2001 From: Moritz Muehlenhoff Date: Fri, 12 Mar 2021 11:44:33 +0100 Subject: cvelist.el: New function to add source entry --- conf/cvelist.el | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'conf') diff --git a/conf/cvelist.el b/conf/cvelist.el index 3318c01a75..e94494f271 100644 --- a/conf/cvelist.el +++ b/conf/cvelist.el @@ -35,6 +35,16 @@ (beginning-of-line) (insert (concat "\t[buster] - " srcpkg " (" reason ")\n" ))) +; TODO: Parse existing source entries for buffer tab completion +(defun debian-cvelist-insert-srcentry () + "Insert new source package entry." + (interactive) + (setq srcpkg (read-string "Source package: " "")) + (setq version (read-string "Fixed version: " "")) + (next-line) + (beginning-of-line) + (insert (concat "\t- " srcpkg " " version "\n"))) + (defun debian-cvelist-cvesearch () "Look up a CVE ID at the MITRE website." (interactive) @@ -46,6 +56,7 @@ (define-key map (kbd "C-c C-n") 'debian-cvelist-insert-note) (define-key map (kbd "C-c C-c") 'debian-cvelist-cvesearch) (define-key map (kbd "C-c C-l") 'debian-cvelist-insert-nodsa) + (define-key map (kbd "C-c C-a") 'debian-cvelist-insert-srcentry) map) "Keymap for `debian-cvelist-mode'.") -- cgit v1.2.3