From db19024b19fa25ad4211a7fdb2ee5f9e60439af9 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Wed, 7 Aug 2024 14:48:03 +0300 Subject: New variable: Add custom--valid-values. * List of valid custom keyword values. --- gnosis.el | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'gnosis.el') diff --git a/gnosis.el b/gnosis.el index 6b396e3..2860464 100644 --- a/gnosis.el +++ b/gnosis.el @@ -217,11 +217,15 @@ When nil, review new notes last." (defvar gnosis-review-notes nil "Review notes.") +;; TODO: Make this as a defcustom (defvar gnosis-custom-values '((:deck "demo" (:proto (0 1 3) :anagnsois 3 :epignosis 0.5 :agnoia 0.3 :amnesia 0.5 :lethe 3)) (:tag "demo" (:proto (1 2) :anagnosis 3 :epignosis 0.5 :agnoia 0.3 :amnesia 0.45 :lethe 3))) "Custom review values for adjusting gnosis algorithm.") +(defvar gnosis-custom--valid-values + '(:proto :anagnosis :epignosis :agnoia :amnesia :lethe)) + ;;; Faces (defgroup gnosis-faces nil -- cgit v1.2.3