diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2015-10-12 12:02:18 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2015-10-12 12:02:18 +0200 |
| commit | 48ba8943e8ad63f778cf89b6e7dc41313127fffb (patch) | |
| tree | c0bc04dd5586ca90758ca7190565443d3e88d1b7 /elisp/geiser-racket.el | |
| parent | 697d0ac94d2d63bf755931122beafcbe1304b321 (diff) | |
| download | geiser-guile-48ba8943e8ad63f778cf89b6e7dc41313127fffb.tar.gz geiser-guile-48ba8943e8ad63f778cf89b6e7dc41313127fffb.tar.bz2 | |
Keeping the elisp compiler happy
Mainly by reordering definitions so that functions are not used before
defined. There are a couple of places where the compiler and I
disagree (it complains withing eval-after-load), and a valid complain
about functions defined via geiser-popup--define that should be
addressed).
Diffstat (limited to 'elisp/geiser-racket.el')
| -rw-r--r-- | elisp/geiser-racket.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el index 80e47b8..ccebcf8 100644 --- a/elisp/geiser-racket.el +++ b/elisp/geiser-racket.el @@ -20,6 +20,8 @@ (require 'geiser-base) (require 'geiser) +(require 'compile) + (eval-when-compile (require 'cl)) @@ -263,7 +265,7 @@ using start-geiser, a procedure in the geiser/server module." ;;; Keywords and syntax -(setq geiser-racket-font-lock-forms +(defvar geiser-racket-font-lock-forms '(("^#lang\\>" . 0) ("\\[\\(else\\)\\>" . 1) ("(\\(define/match\\)\\W+[[(]?\\(\\w+\\)+\\b" |