Changed “Einnland” to “Eittland”

This commit is contained in:
Phuntsok Drak-pa 2019-08-21 14:57:03 +02:00
parent 28ddbc9fa9
commit fa521ee02a
2 changed files with 22 additions and 18 deletions

View File

@ -72,7 +72,7 @@
("v" . "\\\\ng")
("é " . "\\\\oe")))
(setq conlanging//einnlanda-latin-to-latex '((", *" . "\\\\tripledot")
(setq conlanging//eittlanda-latin-to-latex '((", *" . "\\\\tripledot")
("\\. *" . "\\\\tripledot")
(" +" . ":")
("hw" . "x")
@ -81,7 +81,7 @@
("ó" . "v")
("ń" . "\\\\ndot")
("v" . "b")))
(setq conlanging//einnlanda-latin-to-runes '((", *" . "")
(setq conlanging//eittlanda-latin-to-runes '((", *" . "")
("\\. *" . "")
(" +" . "")
("hw" . "")
@ -115,6 +115,10 @@
("r" . "")
("l" . "")))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Common ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun conlanging//replace-string-by-char (t-string t-correspondance-table)
"Return a copy of t-string converted with the correspondance
table"
@ -186,25 +190,25 @@ export"
(conlanging//replace-string-by-char text conlanging//matter-latin-to-runes)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Einnlanda ;
; Eittlanda ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun conlanging/einnlanda-to-runes ()
"Replaces transliterated Einnlandic with its runic writing system"
(defun conlanging/eittlanda-to-runes ()
"Replaces transliterated Eittlandic with its runic writing system"
(interactive)
(conlanging//replace-char-by-table conlanging//einnlanda-latin-to-runes))
(conlanging//replace-char-by-table conlanging//eittlanda-latin-to-runes))
(defun conlanging/einnlanda-to-latex ()
"Replaces transliterated Einnlandic with its corresponding runes"
(defun conlanging/eittlanda-to-latex ()
"Replaces transliterated Eittlandic with its corresponding runes"
(interactive)
(conlanging//replace-char-by-table conlanging//einnlanda-latin-to-latex))
(conlanging//replace-char-by-table conlanging//eittlanda-latin-to-latex))
(defun conlanging/einnlanda-org-export-runes (text)
"Replaces transliterated Einnlandic with its corresponding runes during
(defun conlanging/eittlanda-org-export-runes (text)
"Replaces transliterated Eittlandic with its corresponding runes during
org-mode export"
(interactive)
(if (org-export-derived-backend-p org-export-current-backend
'latex)
(concat "\\textarm{"
(conlanging//replace-string-by-char text conlanging//einnlanda-latin-to-latex)
(conlanging//replace-string-by-char text conlanging//eittlanda-latin-to-latex)
"}")
(conlanging//replace-string-by-char text conlanging//einnlanda-latin-to-runes)))
(conlanging//replace-string-by-char text conlanging//eittlanda-latin-to-runes)))

View File

@ -15,14 +15,14 @@
(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 "oleo" "eittlanda.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 "mle" "Eittlanda")
(spacemacs/declare-prefix-for-mode 'org-mode "mlm" "Mattér")
(spacemacs/set-leader-keys
@ -35,7 +35,7 @@
"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"))
(find-file "~/Documents/code/web/langue-phundrak-fr/eittlanda.org"))
"olto" (lambda () (interactive)
(find-file "~/Documents/code/web/langue-phundrak-fr/taso.org")))
@ -43,7 +43,7 @@
"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)
"ler" 'conlanging/eittlanda-to-runes
"lel" 'conlanging/eittlanda-to-latex)
;;; keybindings.el ends here