;;; module-org.el --- org-mode
;;;
;;; Commentary:
;;;
;;; Setup org-mode and extensions for Emacs.
;;;
;;; Code:

(require 'module-pkg)
(pkg/require 'org-drill)


(setq org-drill-use-visible-cloze-face-p t)
(setq org-drill-hide-item-headings-p t)

(add-to-list
 'org-capture-templates
 '("v" "Deutsch Vocabulary" entry
	 (file+headline "~/doc/deutsch.org" "Vocabulary")
	 "* %^{Word type|Noun|Verb|Adjective|Adverb|Preposition|Conjunction|Interjection|Pronoun} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: twosided\n:END:\n** Deutsch\n%^{German word}\n** English\n%^{English translation}"))

(add-to-list
 'org-capture-templates
 '("V" "Bairisch Vocabulary" entry
	 (file+headline "~/doc/bairisch.org" "Vocabulary")
	 "* %^{Word type|Noun|Verb|Adjective|Adverb|Preposition|Conjunction|Interjection|Pronoun} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: twosided\n:END:\n** Deutsch\n%^{German word}\n** English\n%^{English translation}"))


(add-to-list
 'org-capture-templates
 '("p" "Deutsch Phrase" entry
	 (file+headline "~/doc/deutsch.org" "Phrases")
	 "* %^{Phrase Type|Phrase|Greeting|Idiom|Saying} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: twosided\n:END:\n** Deutsch\n%^{German phrase}\n** English\n%^{English translation}"))

(add-to-list
 'org-capture-templates
 '("P" "Bairisch Phrase" entry
	 (file+headline "~/doc/bairisch.org" "Phrases")
	 "* %^{Phrase Type|Phrase|Greeting|Idiom|Saying} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: twosided\n:END:\n** Deutsch\n%^{German phrase}\n** English\n%^{English translation}"))

(add-to-list
 'org-capture-templates
 '("d" "Deutsch Noun Declension" entry
	 (file+headline "~/doc/deutsch.org" "Noun Declension")
	 "* %^{German word} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: show2cloze\n:END:\n|---\n|Kasus|Singular|Plural|\n|---\n|Nominativ|[%^{nomsing}]|[%^{nompl}]|\n|Genitiv|[%^{gensing}]|[%^{genpl}]|\n|Dativ|[%^{datsing}]|[%^{datpl}]|\n|Akkusativ|[%^{akksing}]|[%^{akkpl}]|\n|---"))

(add-to-list
 'org-capture-templates
 '("d" "Bairisch Noun Declension" entry
	 (file+headline "~/doc/bairisch.org" "Noun Declension")
	 "* %^{German word} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: show2cloze\n:END:\n|---\n|Kasus|Singular|Plural|\n|---\n|Nominativ|[%^{nomsing}]|[%^{nompl}]|\n|Genitiv|[%^{gensing}]|[%^{genpl}]|\n|Dativ|[%^{datsing}]|[%^{datpl}]|\n|Akkusativ|[%^{akksing}]|[%^{akkpl}]|\n|---"))

(add-to-list
 'org-capture-templates
 '("c" "Deutsch Verb Conjugation" entry
	 (file+headline "~/doc/deutsch.org" "Verb Conjugation")
	 "* %^{German word} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: show2cloze\n:END:\n|---\n|ich|[%^{ich}]|wir|[%^{wir}]|\n|du|[%^{du}]|ihr|[%^{ihr}]\n|er/sie/es|[%^{er/sie/es}]|sie/Sie|[%^{sie/Sie}]|\n|--\n\nPerfekt: [%^{verb|haben|sein}] + [%^{perfekt}]."))

(add-to-list
 'org-capture-templates
 '("c" "Bairisch Verb Conjugation" entry
	 (file+headline "~/doc/bairisch.org" "Verb Conjugation")
	 "* %^{German word} :drill:\n:PROPERTIES:\n:DRILL_CARD_TYPE: show2cloze\n:END:\n|---\n|ich|[%^{ich}]|wir|[%^{wir}]|\n|du|[%^{du}]|ihr|[%^{ihr}]\n|er/sie/es|[%^{er/sie/es}]|sie/Sie|[%^{sie/Sie}]|\n|--\n\nPerfekt: [%^{verb|haben|sein}] + [%^{perfekt}]."))

(provide 'module-org-drill)

;;; module-org.el ends here.