branch: elpa/geiser-racket
commit 26f17a399079a551f767a6733129f3be0b4314b8
Author: Jose Antonio Ortega Ruiz <[email protected]>
Commit: Jose Antonio Ortega Ruiz <[email protected]>
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).
---
elisp/geiser-racket.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
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"
