diff -r 0e358702c8a0 -r 24da81e9a023 contrib/gaphrase.el --- a/contrib/gaphrase.el Tue May 14 23:28:56 2019 +0300 +++ b/contrib/gaphrase.el Wed May 15 19:45:48 2019 +0300 @@ -27,6 +27,11 @@ ("^## [1-9][0-9]*" . font-lock-warning-face) ("^- " . font-lock-keyword-face))) +(defvar gaphrase-syntax-table + (let ((table (make-syntax-table text-mode-syntax-table))) + (modify-syntax-entry ?' "w" table) + table)) + (defun gaphrase-next-num () (save-excursion (goto-char (point-min)) @@ -73,7 +78,8 @@ (define-derived-mode gaphrase-mode fundamental-mode "gaphrase" (setq font-lock-defaults '(gaphrase-font-lock-keywords)) (define-key (current-local-map) [C-return] 'gaphrase-insert-template) - (define-key (current-local-map) [S-return] 'gaphrase-insert-sentence)) + (define-key (current-local-map) [S-return] 'gaphrase-insert-sentence) + (set-syntax-table gaphrase-syntax-table)) (provide 'gaphrase)