From 62a7478bd2e4165a3c9e504a9ae084b822e01501 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Mon, 7 Sep 2020 19:48:27 +0100 Subject: [PATCH] defgroup for timestring.el Trying to be more idiomatic. --- emacs/.emacs.d/wpc/timestring.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/emacs/.emacs.d/wpc/timestring.el b/emacs/.emacs.d/wpc/timestring.el index 3685c0f3e..a9bf64e9a 100644 --- a/emacs/.emacs.d/wpc/timestring.el +++ b/emacs/.emacs.d/wpc/timestring.el @@ -32,17 +32,22 @@ ;; Library ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +(defgroup timestring nil + "Customize group for timestring configuration.") + (defcustom timestring-supported-encodings '(("RFC 3339" . "%Y-%m-%dT%H:%M:%SZ") ;; Does anyone recognize this format? ("IDK" . "%Y-%m-%d %H:%M:%S %z")) - "Mapping of encoding names to their format strings.") + "Mapping of encoding names to their format strings." + :group 'timestring) (defcustom timestring-supported-times '(("yesterday" . timestring--yesterday) ("now" . ts-now) ("tomorrow" . timestring--tomorrow)) - "Mapping of a labels to the functions that create those time objects.") + "Mapping of a labels to the functions that create those time objects." + :group 'timestring) (defun timestring--yesterday () "Return a time object for yesterday."