*** Python-CVS/dist/src/Misc/python-mode.el	Tue Dec 31 17:56:20 2002
--- /home/mhagger/lib/emacs/lisp/python-mode.el	Sun Jan 26 19:48:06 2003
***************
*** 1439,1457 ****
    ;; Set the default shell if not already set
    (when (null py-which-shell)
      (py-toggle-shells py-default-interpreter))
!   (let ((args py-which-args))
      (when (and argprompt
  	       (interactive-p)
  	       (fboundp 'split-string))
        ;; TBD: Perhaps force "-i" in the final list?
!       (setq args (split-string
! 		  (read-string (concat py-which-bufname
! 				       " arguments: ")
! 			       (concat
! 				(mapconcat 'identity py-which-args " ") " ")
! 			       ))))
      (switch-to-buffer-other-window
!      (apply 'make-comint py-which-bufname py-which-shell nil args))
      (make-local-variable 'comint-prompt-regexp)
      (setq comint-prompt-regexp "^>>> \\|^[.][.][.] \\|^(pdb) ")
      (add-hook 'comint-output-filter-functions
--- 1439,1458 ----
    ;; Set the default shell if not already set
    (when (null py-which-shell)
      (py-toggle-shells py-default-interpreter))
!   (let ((command (concat
! 		  py-which-shell " "
! 		  (mapconcat 'identity py-which-args " ")
! 		  " ")))
      (when (and argprompt
  	       (interactive-p)
  	       (fboundp 'split-string))
        ;; TBD: Perhaps force "-i" in the final list?
!       (setq command (read-string (concat py-which-bufname " command: ")
! 				 command
! 				 )))
      (switch-to-buffer-other-window
!      (make-comint py-which-bufname
! 		  shell-file-name nil shell-command-switch command))
      (make-local-variable 'comint-prompt-regexp)
      (setq comint-prompt-regexp "^>>> \\|^[.][.][.] \\|^(pdb) ")
      (add-hook 'comint-output-filter-functions