From 845df83a4598d0998666a972244e2594a6e0ddf3 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 4 Jan 2024 04:43:14 +0200 Subject: Remove gnosis-faces.el & notes.el Add faces on gnosis.el --- gnosis.el | 57 +++++++++++++++++++++++++++++++++++++++++++++++++++++++-- 1 file changed, 55 insertions(+), 2 deletions(-) (limited to 'gnosis.el') 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) -- cgit v1.2.3