Mercurial > hgrepos > hgweb.cgi > yatex
annotate yatexhks.el @ 58:3a7c0c2bf16d
Official support for AMS-LaTeX, HTML, xdvi -remote, Netscape
author | yuuji |
---|---|
date | Thu, 01 Feb 1996 18:55:47 +0000 |
parents | 2d45e43fb35f |
children | 9e08ed569d80 |
rev | line source |
---|---|
23 | 1 ;;; -*- Emacs-Lisp -*- |
2 ;;; Hooks for YaTeX | |
3 | |
4 ;;; $BLnD;$K4XO"$9$k5-=R(B($B$?$H$($P%"%I%$%s4X?t(B)$B$O(B yatexhks.el $B$H$$$&L>A0$N(B | |
5 ;;; $B%U%!%$%k$KF~$l$F$/$@$5$$!#5/F0;~$K<+F0E*$K%m!<%I$7$^$9!#(B | |
6 | |
7 ;;; All the private definitions for YaTeX can be stuffed into the file | |
8 ;;; named `yatexhks.el'. The file `yatexhks.el' will be automatically | |
9 ;;; loaded at the end of loading `yatex.el'. | |
10 | |
58
3a7c0c2bf16d
Official support for AMS-LaTeX, HTML, xdvi -remote, Netscape
yuuji
parents:
54
diff
changeset
|
11 ;Private definitions begin from here. |
23 | 12 |
54 | 13 (define-key YaTeX-user-extensional-map "0" |
14 '(lambda () (interactive) (YaTeX-make-section nil nil nil "part"))) | |
15 (define-key YaTeX-user-extensional-map "1" | |
16 '(lambda () (interactive) (YaTeX-make-section nil nil nil "chapter"))) | |
17 (define-key YaTeX-user-extensional-map "2" | |
18 '(lambda () (interactive) (YaTeX-make-section nil nil nil "section"))) | |
19 (define-key YaTeX-user-extensional-map "3" | |
20 '(lambda () (interactive) (YaTeX-make-section nil nil nil "subsection"))) | |
21 (define-key YaTeX-user-extensional-map "4" | |
22 '(lambda () (interactive) (YaTeX-make-section nil nil nil "subsubsection"))) | |
23 (define-key YaTeX-user-extensional-map "5" | |
24 '(lambda () (interactive) (YaTeX-make-section nil nil nil "paragraph"))) | |
25 (define-key YaTeX-user-extensional-map "6" | |
26 '(lambda () (interactive) (YaTeX-make-section nil nil nil "subparagraph"))) | |
27 (define-key YaTeX-user-extensional-map "r" | |
28 '(lambda () (interactive) (YaTeX-make-section nil nil nil "ref"))) | |
29 (define-key YaTeX-user-extensional-map "i" | |
30 '(lambda () (interactive) (YaTeX-make-singlecmd "item"))) | |
31 (define-key YaTeX-user-extensional-map "\C-b" | |
32 '(lambda () (interactive) (YaTeX-make-singlecmd "leftarrow"))) | |
33 (define-key YaTeX-user-extensional-map "l" | |
34 '(lambda () (interactive) (YaTeX-make-section nil nil nil "label"))) | |
35 (define-key YaTeX-user-extensional-map "S" | |
36 '(lambda () (interactive) (YaTeX-make-section nil nil nil "setlength"))) | |
37 (define-key YaTeX-user-extensional-map "b" | |
38 '(lambda () (interactive) (YaTeX-make-fontsize nil "bf"))) | |
39 | |
23 | 40 |
41 ; | |
42 ;;; End of yatexhks.el | |
43 (provide 'yatexhks) |