andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(inferior-emacs-lisp-mode): If hexl not found, use cat. point-min != 1.

Browse source
This commit is contained in:
Stefan Monnier 2002-10-21 22:49:17 +00:00
parent 87b3b78a06
commit 66f067937b
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/ielm.el
View file

@ -419,8 +419,8 @@ simply inserts a newline."
"Major mode for interactively evaluating Emacs Lisp expressions.
Uses the interface provided by `comint-mode' (which see).
* \\<ielm-map>\\[ielm-send-input] evaluates the sexp following the prompt. There must be at most
one top-level sexp per prompt.
* \\<ielm-map>\\[ielm-send-input] evaluates the sexp following the prompt. There must be at most
one top level sexp per prompt.
* \\[ielm-return] inserts a newline and indents, or evaluates a
complete expression (but see variable `ielm-dynamic-return').
@ -499,7 +499,9 @@ Customised bindings may be defined in `ielm-map', which currently contains:
(unless (comint-check-proc (current-buffer))
;; Was cat, but on non-Unix platforms that might not exist, so
;; use hexl instead, which is part of the Emacs distribution.
(start-process "ielm" (current-buffer) "hexl")
(condition-case nil
(start-process "ielm" (current-buffer) "hexl")
(file-error (start-process "ielm" (current-buffer) "cat")))
(process-kill-without-query (ielm-process))
(goto-char (point-max))
@ -512,7 +514,7 @@ Customised bindings may be defined in `ielm-map', which currently contains:
(ielm-set-pm (point-max))
(unless comint-use-prompt-regexp-instead-of-fields
(add-text-properties
1 (point-max)
(point-min) (point-max)
'(rear-nonsticky t field output inhibit-line-move-field-capture t)))
(comint-output-filter (ielm-process) ielm-prompt)
(set-marker comint-last-input-start (ielm-pm))