diff options
| author | Barry Warsaw <barry@python.org> | 1997-11-26 05:27:45 (GMT) |
|---|---|---|
| committer | Barry Warsaw <barry@python.org> | 1997-11-26 05:27:45 (GMT) |
| commit | 47384789b2d53f72198b2ac7b10777a548150c3c (patch) | |
| tree | 0213d410bb2f9ad6023cf06e8cdb892e3f6e606b /Misc/python-mode.el | |
| parent | f11d0240e37749f6278b7f7763364f1c90d3bcdc (diff) | |
| download | cpython-47384789b2d53f72198b2ac7b10777a548150c3c.zip cpython-47384789b2d53f72198b2ac7b10777a548150c3c.tar.gz cpython-47384789b2d53f72198b2ac7b10777a548150c3c.tar.bz2 | |
(py-kill-emacs-hook): Simplification.
Diffstat (limited to 'Misc/python-mode.el')
| -rw-r--r-- | Misc/python-mode.el | 16 |
1 files changed, 5 insertions, 11 deletions
diff --git a/Misc/python-mode.el b/Misc/python-mode.el index e185bca..0904800 100644 --- a/Misc/python-mode.el +++ b/Misc/python-mode.el @@ -2597,17 +2597,6 @@ local bindings to py-newline-and-indent.")) (intern (buffer-substring (match-beginning 1) (match-end 1))) nil))) -(defun py-delete-file-silently (fname) - (condition-case nil - (delete-file fname) - (error nil))) - -(defun py-kill-emacs-hook () - ;; delete our temp files - (py-safe (while py-file-queue - (py-delete-file-silently (car py-file-queue)) - (setq py-file-queue (cdr py-file-queue))))) - (defun py-current-defun () ;; tell add-log.el how to find the current function/method/variable (save-excursion @@ -2668,6 +2657,11 @@ to do so may mean a greater delay in fixing your bug.\n\n") (py-keep-region-active)))) +(defun py-kill-emacs-hook () + (mapcar #'(lambda (filename) + (py-safe (delete-file filename))) + py-file-queue)) + ;; arrange to kill temp files when Emacs exists (add-hook 'kill-emacs-hook 'py-kill-emacs-hook) |