conlang-layer/keybindings.el

;;; packages.el --- conlanging layer packages file for Spacemacs.
;;
;; Copyright (c) 2012-2018 Sylvain Benner & Contributors
;;
;; Author: Lucien Cartier-Tilet <phundrak@phundrak.fr>
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3

(spacemacs/declare-prefix "ol" "conlanging")
(spacemacs/declare-prefix "olh" "Hjelp")
(spacemacs/declare-prefix "olho" "hjelp.org")
(spacemacs/declare-prefix "olm" "Mattér")
(spacemacs/declare-prefix "olmo" "matter.org")
(spacemacs/declare-prefix "ole" "Einnlanda")
(spacemacs/declare-prefix "oleo" "einnlanda.org")
(spacemacs/declare-prefix "oln" "Ňyqy")
(spacemacs/declare-prefix "olno" "nyqy.org")
(spacemacs/declare-prefix "olnO" "nyqy2.org")
(spacemacs/declare-prefix "olt" "Tãso")
(spacemacs/declare-prefix "olto" "taso.org")
(spacemacs/declare-prefix-for-mode 'org-mode "ml" "conlanging")
(spacemacs/declare-prefix-for-mode 'org-mode "mle" "Einnlanda")
(spacemacs/declare-prefix-for-mode 'org-mode "mlm" "Mattér")

(spacemacs/set-leader-keys
  "olho" (lambda () (interactive)
           (find-file "~/Documents/code/web/langue-phundrak-fr/hjelp.org"))
  "olmo" (lambda () (interactive)
           (find-file "~/Documents/code/web/langue-phundrak-fr/matter.org"))
  "olno" (lambda () (interactive)
           (find-file "~/Documents/code/web/langue-phundrak-fr/nyqy.org"))
  "olnO" (lambda () (interactive)
           (find-file "~/Documents/code/web/langue-phundrak-fr/nyqy2.org"))
  "oleo" (lambda () (interactive)
           (find-file "~/Documents/code/web/langue-phundrak-fr/einnlanda.org"))
  "olto" (lambda () (interactive)
           (find-file "~/Documents/code/web/langue-phundrak-fr/taso.org")))

(spacemacs/set-leader-keys-for-major-mode 'org-mode
  "lmr" 'conlanging/matter-to-runes
  "lml" 'conlanging/matter-to-native-latin
  "lmL" 'conlanging/matter-to-latex
  "ler" 'conlanging/einnlanda-to-runes
  "lel" 'conlanging/einnlanda-to-latex)

;;; keybindings.el ends here