Mercurial > emacs
comparison lisp/eshell/em-rebind.el @ 32446:aab90b31807c
Added better remote directory support to Eshell, as well as a few bug
fixes. See the ChangeLog.
| author | John Wiegley <johnw@newartisans.com> |
|---|---|
| date | Fri, 13 Oct 2000 09:02:39 +0000 |
| parents | 3099993cba0f |
| children | 8e57189d61b4 |
comparison
equal
deleted
inserted
replaced
| 32445:05513a882886 | 32446:aab90b31807c |
|---|---|
| 230 (defun eshell-delchar-or-maybe-eof (arg) | 230 (defun eshell-delchar-or-maybe-eof (arg) |
| 231 "Delete ARG characters forward or send an EOF to subprocess. | 231 "Delete ARG characters forward or send an EOF to subprocess. |
| 232 Sends an EOF only if point is at the end of the buffer and there is no | 232 Sends an EOF only if point is at the end of the buffer and there is no |
| 233 input." | 233 input." |
| 234 (interactive "p") | 234 (interactive "p") |
| 235 (let ((proc (get-buffer-process (current-buffer)))) | 235 (let ((proc (eshell-interactive-process))) |
| 236 (if (eobp) | 236 (if (eobp) |
| 237 (cond | 237 (cond |
| 238 ((/= (point) eshell-last-output-end) | 238 ((/= (point) eshell-last-output-end) |
| 239 (beep)) | 239 (beep)) |
| 240 (proc | 240 (proc |