summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-01-04 04:43:14 +0200
committerThanos Apollo <[email protected]>2024-01-04 04:43:14 +0200
commit845df83a4598d0998666a972244e2594a6e0ddf3 (patch)
tree6fda8c0ea8eb23f76fb9625f4dbc22956b1b0d48 /gnosis.el
parent712376d24e787f2a3ea63f828159aa9e967e7ab0 (diff)
Remove gnosis-faces.el & notes.el
Add faces on gnosis.el
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el57
1 files changed, 55 insertions, 2 deletions
diff --git a/gnosis.el b/gnosis.el
index 26e2754..abda991 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -34,8 +34,6 @@
(require 'cl-lib)
(require 'gnosis-algorithm)
-(require 'gnosis-faces)
-
(defgroup gnosis nil
"Spaced repetition learning tool."
@@ -67,6 +65,61 @@ WARNING: Do not change this value!")
(defconst gnosis-db-version 1
"Gnosis database version.")
+;;; Faces
+
+(defgroup gnosis-faces nil
+ "Faces used by gnosis."
+ :group 'gnosis
+ :tag "Gnosis Faces"
+ :prefix 'gnosis-face)
+
+(defface gnosis-face-extra
+ '((t :inherit markdown-italic-face))
+ "Face for extra-notes from note."
+ :group 'gnosis-faces)
+
+(defface gnosis-face-main
+ '((t :inherit default))
+ "Face for main section from note."
+ :group 'gnosis-face-faces)
+
+(defface gnosis-face-seperator
+ '((t :inherit warning))
+ "Face for section seperator."
+ :group 'gnosis-face)
+
+(defface gnosis-face-directions
+ '((t :inherit underline))
+ "Face for gnosis directions."
+ :group 'gnosis-face)
+
+(defface gnosis-face-correct
+ '((t :inherit match))
+ "Face for user choice."
+ :group 'gnosis-face)
+
+(defface gnosis-face-cloze
+ '((t :inherit cursor))
+ "Face for clozes."
+ :group 'gnosis-face)
+
+(defface gnosis-face-false
+ '((t :inherit error))
+ "Face for user choice."
+ :group 'gnosis-face)
+
+(defface gnosis-face-hint
+ '((t :inherit warning))
+ "Face for user choice."
+ :group 'gnosis-face)
+
+(defface gnosis-face-cloze-unanswered
+ '((t :inherit underline))
+ "Face for user choice."
+ :group 'gnosis-face)
+
+
+
(cl-defun gnosis-select (value table &optional (restrictions '1=1))
"Select VALUE from TABLE, optionally with RESTRICTIONS."
(gnosis-db-init)