Use lexical scoping in all fuel sources

[factor.git] / misc / fuel / fuel-menu.el

diff --git a/misc/fuel/fuel-menu.el b/misc/fuel/fuel-menu.el
index 6abcd82172ee1e6ede1ba8e75e75baf60292c098..b0008feeed36280cb668935743e54ff53a54e6e3 100644 (file)
--- a/misc/fuel/fuel-menu.el
+++ b/misc/fuel/fuel-menu.el
@@ -1,4 +1,4 @@
-;;; fuel-menu.el -- menu utilities
+;;; fuel-menu.el -- menu utilities -*- lexical-binding: t -*-
 
 ;; Copyright (c) 2010 Jose Antonio Ortega Ruiz
 ;; See http://factorcode.org/license.txt for BSD license.
@@ -82,6 +82,7 @@
              :button (:toggle . (and (boundp ',mode) ,mode)))))
 
 (defmacro fuel-menu--defmenu (name keymap &rest keys)
+  (declare (indent 2))
   (let ((mmap (make-symbol "mmap")))
     `(progn
        (let ((,mmap (make-sparse-keymap "FUEL")))
@@ -93,10 +94,7 @@
          (fuel-menu--add-items ,keymap ,mmap ,keys)
          ,mmap))))
 
-(put 'fuel-menu--defmenu 'lisp-indent-function 2)
-
-
 \f
 (provide 'fuel-menu)
-;;; fuel-menu.el ends here
 
+;;; fuel-menu.el ends here