Mercurial > emacs
comparison lisp/comint.el @ 90103:3ebd9bdb4fe5
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-13
Merge from emacs--cvs-trunk--0
Patches applied:
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-83
- miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-89
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-90
Update from CVS: man/calc.texi: Add macro for LaTeX for info output.
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-91
- miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-94
Update from CVS
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sun, 13 Feb 2005 07:19:08 +0000 |
parents | fa9654493afb aac0a33f5772 |
children | 4da4a09e8b1b |
comparison
equal
deleted
inserted
replaced
90102:9b4f359c4117 | 90103:3ebd9bdb4fe5 |
---|---|
192 | 192 |
193 If you sometimes use comint-mode on text-only terminals or with `emacs-nw', | 193 If you sometimes use comint-mode on text-only terminals or with `emacs-nw', |
194 you might wish to use another binding for `comint-kill-whole-line'." | 194 you might wish to use another binding for `comint-kill-whole-line'." |
195 :type 'boolean | 195 :type 'boolean |
196 :group 'comint | 196 :group 'comint |
197 :version "21.4") | 197 :version "22.1") |
198 | 198 |
199 (defvar comint-delimiter-argument-list () | 199 (defvar comint-delimiter-argument-list () |
200 "List of characters to recognise as separate arguments in input. | 200 "List of characters to recognise as separate arguments in input. |
201 Strings comprising a character in this list will separate the arguments | 201 Strings comprising a character in this list will separate the arguments |
202 surrounding them, and also be regarded as arguments in their own right (unlike | 202 surrounding them, and also be regarded as arguments in their own right (unlike |
807 (process-mark (get-buffer-process (current-buffer)))) | 807 (process-mark (get-buffer-process (current-buffer)))) |
808 (point)) | 808 (point)) |
809 ;; Insert the input at point | 809 ;; Insert the input at point |
810 (insert (buffer-substring-no-properties | 810 (insert (buffer-substring-no-properties |
811 (previous-single-char-property-change (1+ pos) 'field) | 811 (previous-single-char-property-change (1+ pos) 'field) |
812 (next-single-char-property-change pos 'field)))))) | 812 (next-single-char-property-change pos 'field)))))) |
813 | 813 |
814 | 814 |
815 ;; Input history processing in a buffer | 815 ;; Input history processing in a buffer |
816 ;; =========================================================================== | 816 ;; =========================================================================== |
817 ;; Useful input history functions, courtesy of the Ergo group. | 817 ;; Useful input history functions, courtesy of the Ergo group. |