FUEL: Oops, fix previous patch.

db4
Jose A. Ortega Ruiz 2008-12-06 07:34:11 +01:00
parent c41a0cf6a2
commit 731361d07a
3 changed files with 6 additions and 2 deletions

View File

@ -2,7 +2,7 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays classes.tuple compiler.units continuations debugger 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 make math namespaces parser prettyprint quotations sequences strings
vectors vocabs.loader ; vectors vocabs.loader ;

View File

@ -52,7 +52,7 @@ Quick key reference
- M-. : edit word at point in Emacs - 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-r, C-cC-ee : eval region, extending it to definition boundaries
- C-M-x, C-cC-ex : eval definition around point - C-M-x, C-cC-ex : eval definition around point

View File

@ -113,8 +113,12 @@ buffer."
\\{fuel-listener-mode-map}" \\{fuel-listener-mode-map}"
(set (make-local-variable 'comint-prompt-regexp) (set (make-local-variable 'comint-prompt-regexp)
fuel-listener--prompt-regex) fuel-listener--prompt-regex)
(set (make-local-variable 'comint-prompt-read-only) t)
(fuel-listener--startup)) (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) (provide 'fuel-listener)
;;; fuel-listener.el ends here ;;; fuel-listener.el ends here