From 2b7e3aa00afebe454bea26f54d31847e178c3c33 Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Wed, 16 Sep 2015 21:34:24 +0300 Subject: Add 'geiser-syntax--simple-keywords' Use this function instead of repeating the same code in each implementation. --- elisp/geiser-racket.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'elisp/geiser-racket.el') diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el index 6a849e3..23c6083 100644 --- a/elisp/geiser-racket.el +++ b/elisp/geiser-racket.el @@ -272,10 +272,7 @@ using start-geiser, a procedure in the geiser/server module." (defun geiser-racket--keywords () (append geiser-racket-font-lock-forms - (when geiser-racket-extra-keywords - `((,(format "[[(]%s\\>" - (regexp-opt geiser-racket-extra-keywords 1)) - . 1))))) + (geiser-syntax--simple-keywords geiser-racket-extra-keywords))) (geiser-syntax--scheme-indent (begin0 1) -- cgit v1.2.3