[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/comint.el,v
From: |
Romain Francoise |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/comint.el,v |
Date: |
Wed, 31 Jan 2007 13:20:53 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Romain Francoise <rfrancoise> 07/01/31 13:20:52
Index: comint.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/comint.el,v
retrieving revision 1.356
retrieving revision 1.357
diff -u -b -r1.356 -r1.357
--- comint.el 31 Jan 2007 05:51:20 -0000 1.356
+++ comint.el 31 Jan 2007 13:20:52 -0000 1.357
@@ -1920,17 +1920,6 @@
(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."