[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))))