From 52549913242ca7931d6c44bb2b1e2ca897e9f01c Mon Sep 17 00:00:00 2001 From: Maciej Barć Date: Fri, 3 Feb 2023 17:46:15 +0100 Subject: elogt.el: add elogt-version const; add customization options MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Maciej Barć --- elogt.el | 29 ++++++++++++++++++++++------- 1 file changed, 22 insertions(+), 7 deletions(-) diff --git a/elogt.el b/elogt.el index 88a01e4..981ff16 100644 --- a/elogt.el +++ b/elogt.el @@ -42,13 +42,8 @@ ;;; Code: -(defvar elogt-portage-log-dir "/var/log/portage" - "Portage log directory location.") - -(defvar elogt-check-priority t - "Check priority of each logfile. - -If set to nil entries will have a phony Info level.") +(defconst elogt-version "0.0.0" + "ElogT version.") (defconst elogt--portage-log-stars '((" \e[31;01m*\e[0m" . error) @@ -56,6 +51,26 @@ If set to nil entries will have a phony Info level.") (" \e[33;01m*\e[0m" . warn))) +;; Customization + +(defgroup elogt nil + "Customization for ElogT, Portage Emerge log browser." + :group 'ebuild) + +(defcustom elogt-portage-log-dir "/var/log/portage" + "Portage log directory location." + :safe 'stringp + :type 'file + :group 'elogt) + +(defcustom elogt-check-priority t + "Check priority of each logfile. + +If set to nil entries will have a phony Info level." + :type 'boolean + :group 'elogt) + + ;; Log file processing (defun elogt--gather-portage-logs () -- cgit v1.2.3-65-gdbad