Lines Matching +defs:display +defs:buffer
31 (defvar display-subprocess-window nil
48 (if display-subprocess-window
49 (display-buffer subprocess-buf))
50 (with-current-buffer subprocess-buf
60 the buffer *COMMAND*. Within this buffer, use C-m to send
65 (setq subprocess-buf (get-buffer-create "*COMMAND*"))
66 (with-current-buffer subprocess-buf
75 (defun subprocess-command-to-buffer (command buffer)
80 (call-process cmd nil buffer nil "*dcl*" args)))
84 ;; (with-current-buffer buffer
106 (progn (pop-to-buffer subprocess-buf) (goto-char (point-max)))))
109 "If at last line of buffer, send the current line to
114 (let ((current-line (buffer-substring (point) (line-end-position))))
126 ;; else -- if not at last line in buffer