[Emacs-diffs] Changes to emacs/lisp/ielm.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/ielm.el
diff -c emacs/lisp/ielm.el:1.34.6.2 emacs/lisp/ielm.el:1.34.6.3
*** emacs/lisp/ielm.el:1.34.6.2 Mon Jun 28 07:28:41 2004
--- emacs/lisp/ielm.el  Fri Aug 27 07:00:26 2004
***************
*** 198,204 ****
  ;;; Completion stuff
  
  (defun ielm-tab nil
!   "Possibly indent the current line as lisp code."
    (interactive)
    (if (or (eq (preceding-char) ?\n)
          (eq (char-syntax (preceding-char)) ? ))
--- 198,204 ----
  ;;; Completion stuff
  
  (defun ielm-tab nil
!   "Possibly indent the current line as Lisp code."
    (interactive)
    (if (or (eq (preceding-char) ?\n)
          (eq (char-syntax (preceding-char)) ? ))
***************
*** 207,213 ****
        t)))
  
  (defun ielm-complete-symbol nil
!   "Complete the lisp symbol before point."
    ;; A wrapper for lisp-complete symbol that returns non-nil if
    ;; completion has occurred
    (let* ((btick (buffer-modified-tick))
--- 207,213 ----
        t)))
  
  (defun ielm-complete-symbol nil
!   "Complete the Lisp symbol before point."
    ;; A wrapper for lisp-complete symbol that returns non-nil if
    ;; completion has occurred
    (let* ((btick (buffer-modified-tick))
***************
*** 528,534 ****
      (condition-case nil
        (start-process "ielm" (current-buffer) "hexl")
        (file-error (start-process "ielm" (current-buffer) "cat")))
!     (process-kill-without-query (ielm-process))
      (goto-char (point-max))
  
      ;; Lisp output can include raw characters that confuse comint's
--- 528,534 ----
      (condition-case nil
        (start-process "ielm" (current-buffer) "hexl")
        (file-error (start-process "ielm" (current-buffer) "cat")))
!     (set-process-query-on-exit-flag (ielm-process) nil)
      (goto-char (point-max))
  
      ;; Lisp output can include raw characters that confuse comint's