   :group 'scheme)
 
 (defcustom gerbil-mode-hook nil
-  "hook run when entering `gerbil-mode'. 
+  "hook run when entering `gerbil-mode'.
 The hook is run after scheme-mode-hook."
   :type 'hook
   :group 'gerbil)

                 do-while
                 )
              'scheme-indent-function 2)
  (gerbil-put '(def defvalues extern 
                 defalias defsyntax defrule defrules defrules*
                  defstruct defclass defmethod 
                  definline definline*
                  define-values define-syntaxes
                  defsyntax/parameter

  (interactive)
  (gerbil-fontlock-add
   `("\\(lambda\\)"
     (0 (progn
          (compose-region (match-beginning 1) (match-end 1)
                          ,(make-char 'greek-iso8859-7 107))
          nil)))))
