Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 02:47:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

Delete extra copy of `comint-copy-old-input' added in previous change to

Browse source 
this file.
This commit is contained in:
Romain Francoise 2007-01-31 13:20:52 +00:00
parent 28ed185c9a
commit e3633d8bdc
2 changed files with 5 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2007-01-31 Romain Francoise <romain@orebokech.com>
* comint.el: Delete extra copy of `comint-copy-old-input' added in
previous change to this file.
2007-01-31 Jason Rumney <jasonr@gnu.org>
* files.el (magic-mode-alist): Use image-mode-maybe rather than

11
lisp/comint.el
View file

@ -1920,17 +1920,6 @@ Calls `comint-get-old-input' to get old input."
(goto-char (process-mark process))
(insert input))))
(defun comint-copy-old-input ()
"Insert after prompt old input at point as new input to be edited.
Calls `comint-get-old-input' to get old input."
(interactive)
(let ((input (funcall comint-get-old-input))
(process (get-buffer-process (current-buffer))))
(if (not process)
(error "Current buffer has no process")
(goto-char (process-mark process))
(insert input))))
(defun comint-skip-prompt ()
"Skip past the text matching regexp `comint-prompt-regexp'.
If this takes us past the end of the current line, don't skip at all."