[Emacs-diffs] Changes to emacs/lisp/comint.el

[Juanma Barranquero]

Index: emacs/lisp/comint.el
diff -c emacs/lisp/comint.el:1.321 emacs/lisp/comint.el:1.322
*** emacs/lisp/comint.el:1.321  Thu Jun  9 21:16:40 2005
--- emacs/lisp/comint.el        Fri Jun 10 00:17:49 2005
***************
*** 583,589 ****
  Setting variable `comint-eol-on-send' means jump to the end of the line
  before submitting new input.
  
! This mode is customised to create major modes such as Inferior Lisp
  mode, Shell mode, etc.  This can be done by setting the hooks
  `comint-input-filter-functions', `comint-input-filter', `comint-input-sender'
  and `comint-get-old-input' to appropriate functions, and the variable
--- 583,589 ----
  Setting variable `comint-eol-on-send' means jump to the end of the line
  before submitting new input.
  
! This mode is customized to create major modes such as Inferior Lisp
  mode, Shell mode, etc.  This can be done by setting the hooks
  `comint-input-filter-functions', `comint-input-filter', `comint-input-sender'
  and `comint-get-old-input' to appropriate functions, and the variable
***************
*** 654,660 ****
    (set (make-local-variable 'next-line-add-newlines) nil))
  
  (defun comint-check-proc (buffer)
!   "Return t if there is a living process associated w/buffer BUFFER.
  Living means the status is `open', `run', or `stop'.
  BUFFER can be either a buffer or the name of one."
    (let ((proc (get-buffer-process buffer)))
--- 654,660 ----
    (set (make-local-variable 'next-line-add-newlines) nil))
  
  (defun comint-check-proc (buffer)
!   "Return non-nil if there is a living process associated w/buffer BUFFER.
  Living means the status is `open', `run', or `stop'.
  BUFFER can be either a buffer or the name of one."
    (let ((proc (get-buffer-process buffer)))
***************
*** 667,673 ****
  PROGRAM should be either a string denoting an executable program to create
  via `start-process', or a cons pair of the form (HOST . SERVICE) denoting a 
TCP
  connection to be opened via `open-network-stream'.  If there is already a
! running process in that buffer, it is not restarted.  Optional third arg
  STARTFILE is the name of a file to send the contents of to the process.
  
  If PROGRAM is a string, any more args are arguments to PROGRAM."
--- 667,673 ----
  PROGRAM should be either a string denoting an executable program to create
  via `start-process', or a cons pair of the form (HOST . SERVICE) denoting a 
TCP
  connection to be opened via `open-network-stream'.  If there is already a
! running process in that buffer, it is not restarted.  Optional fourth arg
  STARTFILE is the name of a file to send the contents of to the process.
  
  If PROGRAM is a string, any more args are arguments to PROGRAM."
***************
*** 1583,1589 ****
  
  (defun comint-snapshot-last-prompt ()
    "`snapshot' any current `comint-last-prompt-overlay'.
! freeze its attributes in place, even when more input comes a long
  and moves the prompt overlay."
    (when comint-last-prompt-overlay
      (let ((inhibit-read-only t)
--- 1583,1589 ----
  
  (defun comint-snapshot-last-prompt ()
    "`snapshot' any current `comint-last-prompt-overlay'.
! Freeze its attributes in place, even when more input comes along
  and moves the prompt overlay."
    (when comint-last-prompt-overlay
      (let ((inhibit-read-only t)
***************
*** 2389,2395 ****
    "Compute the defaults for `load-file' and `compile-file' commands.
  
  PREVIOUS-DIR/FILE is a pair (directory . filename) from the last
! source-file processing command.  nil if there hasn't been one yet.
  SOURCE-MODES is a list used to determine what buffers contain source
  files: if the major mode of the buffer is in SOURCE-MODES, it's source.
  Typically, (lisp-mode) or (scheme-mode).
--- 2389,2395 ----
    "Compute the defaults for `load-file' and `compile-file' commands.
  
  PREVIOUS-DIR/FILE is a pair (directory . filename) from the last
! source-file processing command, or nil if there hasn't been one yet.
  SOURCE-MODES is a list used to determine what buffers contain source
  files: if the major mode of the buffer is in SOURCE-MODES, it's source.
  Typically, (lisp-mode) or (scheme-mode).