Use lexical scoping in all fuel sources

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

diff --git a/misc/fuel/fuel-refactor.el b/misc/fuel/fuel-refactor.el
index b0522af647160b094a361f43a7df0df7f5a7b531..33a2ed738d0137638c5f9bbec4fd179e65bb069f 100644 (file)
--- a/misc/fuel/fuel-refactor.el
+++ b/misc/fuel/fuel-refactor.el
@@ -1,4 +1,4 @@
-;;; fuel-refactor.el -- code refactoring support
+;;; fuel-refactor.el -- code refactoring support -*- lexical-binding: t -*-
 
 ;; Copyright (C) 2009 Jose Antonio Ortega Ruiz
 ;; See http://factorcode.org/license.txt for BSD license.
@@ -223,8 +223,7 @@ With prefix argument, use word at point instead."
   (interactive "P")
   (let* ((from (if arg (factor-symbol-at-point) (fuel-refactor--def-word)))
          (from (read-string "Rename word: " from))
-         (to (read-string (format "Rename '%s' to: " from)))
-         (buffer (current-buffer)))
+         (to (read-string (format "Rename '%s' to: " from))))
     (fuel-refactor--rename-word from to (buffer-file-name))))
 
 \f