[nongnu] elpa/geiser-racket 26f17a3 167/191: Keeping the elisp compiler happy

[Philip Kaludercic]

branch: elpa/geiser-racket
commit 26f17a399079a551f767a6733129f3be0b4314b8
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>

    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"