Mercurial > emacs

comparison lisp/comint.el @ 90103:3ebd9bdb4fe5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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.