Lines Matching defs:working
141 Normally identical to `*'. However, if the working buffer is an IELM
143 the working buffer, `*1' the value in the process buffer.
148 Normally identical to `**'. However, if the working buffer is an IELM
150 the working buffer, `*2' the value in the process buffer.
155 Normally identical to `***'. However, if the working buffer is an IELM
157 the working buffer, `*3' the value in the process buffer.
162 (defvar ielm-working-buffer nil
188 ;; Some convenience bindings for setting the working buffer
189 (define-key ielm-map "\C-c\C-b" 'ielm-change-working-buffer)
190 (define-key ielm-map "\C-c\C-f" 'ielm-display-working-buffer)
191 (define-key ielm-map "\C-c\C-v" 'ielm-print-working-buffer))
239 (defun ielm-print-working-buffer nil
240 "Print the current IELM working buffer's name in the echo area."
242 (message "The current working buffer is: %s" (buffer-name ielm-working-buffer)))
244 (defun ielm-display-working-buffer nil
245 "Display the current IELM working buffer.
249 (display-buffer ielm-working-buffer)
250 (ielm-print-working-buffer))
252 (defun ielm-change-working-buffer (buf)
253 "Change the current IELM working buffer to BUF.
257 (interactive "bSet working buffer to: ")
258 (setq ielm-working-buffer (or (get-buffer buf) (error "No such buffer")))
259 (ielm-print-working-buffer))
328 (ielm-wbuf ielm-working-buffer) ; current buffer after evaluation
340 ;; Make sure working buffer has not been killed
341 (if (not (buffer-name ielm-working-buffer))
396 (if (eq ielm-wbuf ielm-working-buffer) nil
398 (setq ielm-working-buffer ielm-wbuf))
456 The current working buffer may be changed (with a call to
457 `set-buffer', or with \\[ielm-change-working-buffer]), and its value
461 it with \\[ielm-print-working-buffer], or the buffer itself with \\[ielm-display-working-buffer].
465 evaluations respectively. If the working buffer is another IELM
466 buffer, then the values in the working buffer are used. The variables
502 (setq mode-line-process '(":%s on " (:eval (buffer-name ielm-working-buffer))))
507 (make-local-variable 'ielm-working-buffer)
508 (setq ielm-working-buffer (current-buffer))