FUEL: Emacs 22 compat.

diff --git a/misc/fuel/fuel-debug-uses.el b/misc/fuel/fuel-debug-uses.el
index c5c31c8e7d02561d350c0bf493666c33b7b5c863..eecdfa704403f7697464eb67ab560540301ce7a8 100644 (file)
--- a/misc/fuel/fuel-debug-uses.el
+++ b/misc/fuel/fuel-debug-uses.el
@@ -184,7 +184,7 @@
       (with-current-buffer (fuel-debug--uses-buffer)
         (insert "\nDone!")
         (fuel-debug--uses-clean)
-        (kill-buffer)))))
+        (kill-buffer (current-buffer))))))
 
 (defun fuel-debug--uses-restart (n)
   (when (and (> n 0) (<= n (length fuel-debug--uses-restarts)))