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

[Pavel Janík]

Index: emacs/lisp/progmodes/inf-lisp.el
diff -c emacs/lisp/progmodes/inf-lisp.el:1.30 
emacs/lisp/progmodes/inf-lisp.el:1.31
*** emacs/lisp/progmodes/inf-lisp.el:1.30       Tue Oct 10 13:27:38 2000
--- emacs/lisp/progmodes/inf-lisp.el    Thu Dec 20 13:15:41 2001
***************
*** 436,442 ****
  (defun lisp-load-file (file-name)
    "Load a Lisp file into the inferior Lisp process."
    (interactive (comint-get-source "Load Lisp file: " lisp-prev-l/c-dir/file
!                                 lisp-source-modes nil)) ; NIL because LOAD
                                        ; doesn't need an exact name
    (comint-check-source file-name) ; Check to see if buffer needs saved.
    (setq lisp-prev-l/c-dir/file (cons (file-name-directory    file-name)
--- 436,442 ----
  (defun lisp-load-file (file-name)
    "Load a Lisp file into the inferior Lisp process."
    (interactive (comint-get-source "Load Lisp file: " lisp-prev-l/c-dir/file
!                                 lisp-source-modes nil)) ; nil because LOAD
                                        ; doesn't need an exact name
    (comint-check-source file-name) ; Check to see if buffer needs saved.
    (setq lisp-prev-l/c-dir/file (cons (file-name-directory    file-name)
***************
*** 449,455 ****
  (defun lisp-compile-file (file-name)
    "Compile a Lisp file in the inferior Lisp process."
    (interactive (comint-get-source "Compile Lisp file: " lisp-prev-l/c-dir/file
!                                 lisp-source-modes nil)) ; NIL = don't need
                                        ; suffix .lisp
    (comint-check-source file-name) ; Check to see if buffer needs saved.
    (setq lisp-prev-l/c-dir/file (cons (file-name-directory    file-name)
--- 449,455 ----
  (defun lisp-compile-file (file-name)
    "Compile a Lisp file in the inferior Lisp process."
    (interactive (comint-get-source "Compile Lisp file: " lisp-prev-l/c-dir/file
!                                 lisp-source-modes nil)) ; nil = don't need
                                        ; suffix .lisp
    (comint-check-source file-name) ; Check to see if buffer needs saved.
    (setq lisp-prev-l/c-dir/file (cons (file-name-directory    file-name)