.emacs.d/abbrev_defs at master · suvayu/.emacs.d · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
;;-*-coding: utf-8; mode: emacs-lisp -*-

;; abbrevs with +/- do not work, probably b/c they do not count as
;; part of the word
(define-abbrev-table 'unicode-abbrev-table
  '(("Bs2Dspi" "Bs → Dsπ" nil 0)
    ("Bs2DsK" "Bs → DsK" nil 0)
    ("Dspi" "Dsπ" nil 0)
    )
  "Abbreviation table with unicode characters (use in org buffers
   or emails).")

(define-abbrev-table 'latex-mode-abbrev-table
  '(("kfactor" "\\emph{k}-factor" nil 0)
    ("SU3" "\\(SU(3)\\)" nil 0)
    ("SU2" "\\(SU(2)\\)" nil 0)
    ("U1" "\\(U(1)\\)" nil 0)
    ("Bs" "B\\(_\\text{s}\\)" nil 0)
    ("Ds" "D\\(_\\text{s}\\)" nil 0)
    ("Dsst" "D\\(_\\text{s}^{*}\\)" nil 0)
    ("Lb" "Λ\\(_\\text{b}\\)" nil 0)
    ("Lc" "Λ\\(_\\text{c}\\)" nil 0)
    ("pis" "π\\(_\\text{s}\\)" nil 0)
    ("Bs2Dspi" "B\\(_\\text{s}\\) → D\\(_\\text{s}\\)π" nil 0)
    ("Bs2DsK"  "B\\(_\\text{s}\\) → D\\(_\\text{s}\\)K" nil 0)
    ("Dspi"    "D\\(_\\text{s}\\)π" nil 0)
    ("DsK"     "D\\(_\\text{s}\\)K" nil 0)
    ("Bs2"     "B\\(_\\text{s}\\) →" nil 0)
    ("Bs2Ds"   "B\\(_\\text{s}\\) → D\\(_\\text{s}\\)" nil 0)
    )
  "Abbreviation table for `org-mode'. Inherits from
  `text-mode-abbrev-table'."
  :parents (list text-mode-abbrev-table))

(define-abbrev-table 'org-mode-abbrev-table
  '(("kfactor" "/k/-factor" nil 0)
    ("Bs" "B_{s}" nil 0)
    ("Ds" "D_{s}" nil 0)
    ("Dsst" "D\\(_\\text{s}^{*}\\)" nil 0)
    ("Lb" "Λ_{b}" nil 0)
    ("Lc" "Λ_{c}" nil 0)
    ("pis" "π_{s}" nil 0)
    ("Bs2Dspi" "B_{s} → D_{s}π" nil 0)
    ("Bs2DsK" "B_{s} → D_{s}K" nil 0)
    ("Dspi" "D_{s}π" nil 0)
    ("DsK" "D_{s}K" nil 0)
    ("Bs2" "B_{s} →" nil 0)
    )
  "Abbreviation table for `org-mode'. Inherits from
  `text-mode-abbrev-table'."
  :parents (list text-mode-abbrev-table unicode-abbrev-table))

(define-abbrev-table 'message-mode-abbrev-table
  '(("hth" "Hope this helps" nil 0)
    ("HTH" "Hope this helps" nil 0)
    ("cheers" "Cheers" nil 0)
    ("thanks" "Thanks" nil 0)
    )
  "Abbreviation table for `message-mode'. Inherits from
  `text-mode-abbrev-table' and `unicode-abbrev-table'."
  :parents (list text-mode-abbrev-table unicode-abbrev-table))