comparison lisp/eshell/em-rebind.el @ 31241:3099993cba0f

See ChangeLog
author John Wiegley <johnw@newartisans.com>
date Tue, 29 Aug 2000 00:47:45 +0000
parents 34b1ab9d583d
children aab90b31807c
comparison
equal deleted inserted replaced
31240:10b1c85c0bbe 31241:3099993cba0f
233 input." 233 input."
234 (interactive "p") 234 (interactive "p")
235 (let ((proc (get-buffer-process (current-buffer)))) 235 (let ((proc (get-buffer-process (current-buffer))))
236 (if (eobp) 236 (if (eobp)
237 (cond 237 (cond
238 ((not (= (point) eshell-last-output-end)) 238 ((/= (point) eshell-last-output-end)
239 (beep)) 239 (beep))
240 (proc 240 (proc
241 (process-send-eof)) 241 (process-send-eof))
242 (t 242 (t
243 (eshell-life-is-too-much))) 243 (eshell-life-is-too-much)))