[Python-checkins] python/dist/src/Misc python-mode.el,4.26,4.27

barry@users.sourceforge.net barry@users.sourceforge.net
Sat, 28 Sep 2002 11:17:58 -0700


Update of /cvsroot/python/python/dist/src/Misc
In directory usw-pr-cvs1:/tmp/cvs-serv1276

Modified Files:
	python-mode.el 
Log Message:
(py-pychecker-run): Fix calculation of last command to include the
filename of the current buffer.


Index: python-mode.el
===================================================================
RCS file: /cvsroot/python/python/dist/src/Misc/python-mode.el,v
retrieving revision 4.26
retrieving revision 4.27
diff -C2 -d -r4.26 -r4.27
*** python-mode.el	17 Jul 2002 21:25:43 -0000	4.26
--- python-mode.el	28 Sep 2002 18:17:56 -0000	4.27
***************
*** 2771,2780 ****
             (format "%s %s %s" py-pychecker-command
  		   (mapconcat 'identity py-pychecker-command-args " ")
! 		   (buffer-file-name))))
  
       (list
        (read-shell-command "Run pychecker like this: "
!                           (if py-pychecker-history
! 			      (car py-pychecker-history)
  			    default)
                            'py-pychecker-history))))
--- 2771,2785 ----
             (format "%s %s %s" py-pychecker-command
  		   (mapconcat 'identity py-pychecker-command-args " ")
! 		   (buffer-file-name)))
! 	 (last (when py-pychecker-history
! 		 (let* ((lastcmd (car py-pychecker-history))
! 			(cmd (cdr (reverse (split-string lastcmd))))
! 			(newcmd (reverse (cons (buffer-file-name) cmd))))
! 		   (mapconcat 'identity newcmd " ")))))
  
       (list
        (read-shell-command "Run pychecker like this: "
!                           (if last
! 			      last
  			    default)
                            'py-pychecker-history))))