(Arne Babenhauserheide)
2013-04-27: experiments with the emacs mode. experiments with the emacs mode.
diff --git a/wisp-mode.el b/wisp-mode.el --- a/wisp-mode.el +++ b/wisp-mode.el @@ -23,6 +23,8 @@ ;;; Code: +(require 'scheme) + (define-derived-mode wisp-mode emacs-lisp-mode "Wisp" "Major mode for whitespace-to-lisp files. @@ -36,8 +38,16 @@ (set (make-local-variable 'font-lock-defaults) '((scheme-font-lock-keywords scheme-font-lock-keywords-1 scheme-font-lock-keywords-2) - nil nil nil nil)) + nil ; keywords only + nil ; case fold + '((?_ "-")) ; syntax alist + 'backward-paragraph)) ; syntax begin (set (make-local-variable 'mode-require-final-newline) t)) +(font-lock-add-keywords 'wisp-mode + '(("^ *\\(\\w+\\)\\| : *\\(\\w+\\)" . 'font-lock-function-call-face) + ("^ *\\(\\w+\\)\\| : *\\(\\w+\\)" . 'font-lock-function-call-face))) + + (provide 'wisp-mode) ;;; wisp-mode.el ends here