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

barry@users.sourceforge.net barry@users.sourceforge.net
2002年9月28日 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))))

AltStyle によって変換されたページ (->オリジナル) /