Mark word before article with expand-region.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Fri, 20 Oct 2017 16:58:36 +0300
changeset 949 2c01a30887a8
parent 948 6abd5e040102
child 950 2fe7e7412f89
Mark word before article with expand-region.
contrib/gadict.el
--- a/contrib/gadict.el	Fri Oct 20 02:01:28 2017 +0300
+++ b/contrib/gadict.el	Fri Oct 20 16:58:36 2017 +0300
@@ -219,7 +219,7 @@
 (defvar er/try-expand-list)
 (defun gadict-setup-expansions ()
   "Add `gadict-mode' specific expansions."
-  (set (make-local-variable 'er/try-expand-list) (list #'gadict-mark-article)))
+  (set (make-local-variable 'er/try-expand-list) (list #'er/mark-word #'gadict-mark-article)))
 
 (defvar font-lock-beg)
 (defvar font-lock-end)