summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2015-02-21 22:06:13 -0500
committerKyle Meyer <kyle@kyleam.com>2015-02-28 00:29:49 -0500
commit149109e4c1b602817bbe14f59f001e03f9fd9cb7 (patch)
tree75d9dd3a4750d194ca048916ebdce78eca50b534
parent405a2beebbb2695efb2de6462242b1b46fb98fc6 (diff)
downloademacs.d-149109e4c1b602817bbe14f59f001e03f9fd9cb7.tar.gz
Make typo-abbrev-table
Previously, I was using global-abbrev-table as an initial capture area for abbrevs and for really common typos. Make separate table for common typos so that global-abbrev-table only serves as capture area.
-rw-r--r--lisp/init-abbrev.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/init-abbrev.el b/lisp/init-abbrev.el
index 22cfd0b..04d0c1a 100644
--- a/lisp/init-abbrev.el
+++ b/lisp/init-abbrev.el
@@ -1,6 +1,11 @@
(setq save-abbrevs 'silently)
+(define-abbrev-table 'typo-abbrev-table nil)
+(abbrev-table-put global-abbrev-table :parents
+ (cons typo-abbrev-table
+ (abbrev-table-get global-abbrev-table :parents)))
+
(defun km/abbrev-add-case-global ()
"Define lower abbreviation for the word before point.
Like `add-global-abbrev', but always make the abbreviation the