aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaciej Barć <xgqt@gentoo.org>2023-02-03 17:46:15 +0100
committerMaciej Barć <xgqt@gentoo.org>2023-02-03 17:46:15 +0100
commit52549913242ca7931d6c44bb2b1e2ca897e9f01c (patch)
treee601ad24002ca91cafb3871ccb2a4127eef0ad05
parent*: init (diff)
downloademacs-elogt-52549913242ca7931d6c44bb2b1e2ca897e9f01c.tar.gz
emacs-elogt-52549913242ca7931d6c44bb2b1e2ca897e9f01c.tar.bz2
emacs-elogt-52549913242ca7931d6c44bb2b1e2ca897e9f01c.zip
elogt.el: add elogt-version const; add customization options
Signed-off-by: Maciej Barć <xgqt@gentoo.org>
-rw-r--r--elogt.el29
1 files 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 ()