diff --git a/extra/fuel/fuel.factor b/extra/fuel/fuel.factor
index 357e7508f4..d8a363ca71 100644
--- a/extra/fuel/fuel.factor
+++ b/extra/fuel/fuel.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 
 USING: accessors arrays classes.tuple compiler.units continuations debugger
-eval io io.streams.string kernel listener listener.private
+definitions eval io io.files io.streams.string kernel listener listener.private
 make math namespaces parser prettyprint quotations sequences strings
 vectors vocabs.loader ;
 
diff --git a/misc/fuel/README b/misc/fuel/README
index 817695f626..078490abfd 100644
--- a/misc/fuel/README
+++ b/misc/fuel/README
@@ -52,7 +52,7 @@ Quick key reference
 
  - M-. : edit word at point in Emacs
 
- - C-C-r, C-cC-er : eval region
+ - C-cr, C-cC-er : eval region
  - C-M-r, C-cC-ee : eval region, extending it to definition boundaries
  - C-M-x, C-cC-ex : eval definition around point
 
diff --git a/misc/fuel/fuel-listener.el b/misc/fuel/fuel-listener.el
index 958c589220..c741a77a5d 100644
--- a/misc/fuel/fuel-listener.el
+++ b/misc/fuel/fuel-listener.el
@@ -113,8 +113,12 @@ buffer."
 \\{fuel-listener-mode-map}"
   (set (make-local-variable 'comint-prompt-regexp)
        fuel-listener--prompt-regex)
+  (set (make-local-variable 'comint-prompt-read-only) t)
   (fuel-listener--startup))
 
+;; (define-key fuel-listener-mode-map "\C-w" 'comint-kill-region)
+;; (define-key fuel-listener-mode-map "\C-k" 'comint-kill-whole-line)
+
 
 (provide 'fuel-listener)
 ;;; fuel-listener.el ends here