Skip to content

Commit

Permalink
[43_10] Move latex-kbd to the latex plugin
Browse files Browse the repository at this point in the history
  • Loading branch information
da-liii authored Aug 29, 2024
1 parent 26bb159 commit f63e5b3
Show file tree
Hide file tree
Showing 5 changed files with 41 additions and 29 deletions.
15 changes: 15 additions & 0 deletions TeXmacs/plugins/latex/progs/init-latex.scm
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; MODULE : init-latex.scm
;; DESCRIPTION : Initialize the LaTeX plugin
;; COPYRIGHT : (C) 2024 Darcy Shen
;;
;; This software falls under the GNU general public license and comes WITHOUT
;; ANY WARRANTY WHATSOEVER. See the file $TEXMACS_PATH/LICENSE for details.
;; If you don't have this file, write to the Free Software Foundation, Inc.,
;; 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(import-from (latex-kbd))
Original file line number Diff line number Diff line change
Expand Up @@ -11,7 +11,7 @@
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(texmacs-module (texmacs keyboard latex-kbd)
(texmacs-module (latex-kbd)
(:use (utils edit auto-close)
(generic format-edit)
(generic generic-edit)
Expand Down Expand Up @@ -140,28 +140,28 @@
("equation" "Insert numbered equation" (make-equation))
("eqnarray*" "Insert equation array" (make-eqnarray*))

("cC" "Make Ç" (emulate-keyboard "cedilla C"))
("cc" "Make ç" (emulate-keyboard "cedilla c"))
("'E" "Insert É" (emulate-keyboard "acute E"))
("'e" "Insert é" (emulate-keyboard "acute e"))
("`A" "Insert À" (emulate-keyboard "grave A"))
("`E" "Insert È" (emulate-keyboard "grave E"))
("`U" "Insert Ù" (emulate-keyboard "grave U"))
("`a" "Insert à" (emulate-keyboard "grave a"))
("`e" "Insert è" (emulate-keyboard "grave e"))
("`u" "Insert ù" (emulate-keyboard "grave u"))
("^A" "Insert Â" (emulate-keyboard "hat A"))
("^E" "Insert Ê" (emulate-keyboard "hat E"))
("^I" "Insert Î" (emulate-keyboard "hat I"))
("^O" "Insert Ô" (emulate-keyboard "hat O"))
("^U" "Insert Û" (emulate-keyboard "hat U"))
("^a" "Insert â" (emulate-keyboard "hat a"))
("^e" "Insert ê" (emulate-keyboard "hat e"))
("^i" "Insert î" (emulate-keyboard "hat i"))
("^o" "Insert ô" (emulate-keyboard "hat o"))
("^u" "Insert û" (emulate-keyboard "hat u"))
("S" "Make Ÿ" (emulate-keyboard "S-F5 p"))
("aa" "Insert å" (insert "å"))
("cC" "Make " (emulate-keyboard "cedilla C"))
("cc" "Make " (emulate-keyboard "cedilla c"))
("'E" "Insert " (emulate-keyboard "acute E"))
("'e" "Insert " (emulate-keyboard "acute e"))
("`A" "Insert " (emulate-keyboard "grave A"))
("`E" "Insert " (emulate-keyboard "grave E"))
("`U" "Insert " (emulate-keyboard "grave U"))
("`a" "Insert " (emulate-keyboard "grave a"))
("`e" "Insert " (emulate-keyboard "grave e"))
("`u" "Insert " (emulate-keyboard "grave u"))
("^A" "Insert " (emulate-keyboard "hat A"))
("^E" "Insert " (emulate-keyboard "hat E"))
("^I" "Insert " (emulate-keyboard "hat I"))
("^O" "Insert " (emulate-keyboard "hat O"))
("^U" "Insert " (emulate-keyboard "hat U"))
("^a" "Insert " (emulate-keyboard "hat a"))
("^e" "Insert " (emulate-keyboard "hat e"))
("^i" "Insert " (emulate-keyboard "hat i"))
("^o" "Insert " (emulate-keyboard "hat o"))
("^u" "Insert " (emulate-keyboard "hat u"))
("S" "Make " (emulate-keyboard "S-F5 p"))
("aa" "Insert " (insert ""))
("ae" "Insert ae" (emulate-keyboard "S-F5 a"))
("dh" "Insert ð" (insert "<#00F0>"))
("dj" "Insert <#0111>" (insert "<#0111>"))
Expand All @@ -171,10 +171,10 @@
("ng" "Insert <#014B>" (insert "<#014B>"))
("o" "Insert <#00F8>" (insert "<#00F8>"))
("oe" "Insert oe" (emulate-keyboard "S-F5 o e"))
("ss" "Insert ÿ" (emulate-keyboard "S-F5 s"))
("sz" "Insert ÿ" (emulate-keyboard "S-F5 s"))
("ss" "Insert " (emulate-keyboard "S-F5 s"))
("sz" "Insert " (emulate-keyboard "S-F5 s"))
("th" "Insert <#00FE>" (insert "<#00FE>"))
("AA" "Insert Å" (insert "Å"))
("AA" "Insert " (insert ""))
("AE" "Insert AE" (emulate-keyboard "S-F5 A"))
("DH" "Insert Ð" (insert "<#00D0>"))
("L" "Insert <#0141>" (insert "<#0141>"))
Expand Down
1 change: 0 additions & 1 deletion TeXmacs/progs/init-beamer.scm
Original file line number Diff line number Diff line change
Expand Up @@ -118,7 +118,6 @@
(use-modules (app beamer buffer))
(use-modules (texmacs keyboard config-kbd))
(lazy-keyboard (texmacs keyboard prefix-kbd) always?)
(lazy-keyboard (texmacs keyboard latex-kbd) always?)
(lazy-menu (texmacs menus file-menu) file-menu go-menu
new-file-menu load-menu save-menu
print-menu print-menu-inline close-menu)
Expand Down
1 change: 0 additions & 1 deletion TeXmacs/progs/init-draw.scm
Original file line number Diff line number Diff line change
Expand Up @@ -115,7 +115,6 @@
(use-modules (app research buffer))
(use-modules (texmacs keyboard config-kbd))
(lazy-keyboard (texmacs keyboard prefix-kbd) always?)
(lazy-keyboard (texmacs keyboard latex-kbd) always?)
(lazy-menu (texmacs menus file-menu) file-menu go-menu
new-file-menu load-menu save-menu
print-menu print-menu-inline close-menu)
Expand Down
1 change: 0 additions & 1 deletion TeXmacs/progs/init-research.scm
Original file line number Diff line number Diff line change
Expand Up @@ -118,7 +118,6 @@
(use-modules (app research buffer))
(use-modules (texmacs keyboard config-kbd))
(lazy-keyboard (texmacs keyboard prefix-kbd) always?)
(lazy-keyboard (texmacs keyboard latex-kbd) always?)
(lazy-menu (texmacs menus file-menu) file-menu go-menu
new-file-menu load-menu save-menu
print-menu print-menu-inline close-menu)
Expand Down

0 comments on commit f63e5b3

Please sign in to comment.