diff options
| author | Fabián Ezequiel Gallina | 2012-05-17 00:03:01 -0300 |
|---|---|---|
| committer | Fabián Ezequiel Gallina | 2012-05-17 00:03:01 -0300 |
| commit | 6eb68dc25b13771811fa7afc2d0b3b90347a57b9 (patch) | |
| tree | 64ca0503cf375c4e051c98afd005960214f184b3 | |
| parent | 534e24385bb1d5d022729e55d3d8cd2c6c114628 (diff) | |
| download | emacs-6eb68dc25b13771811fa7afc2d0b3b90347a57b9.tar.gz emacs-6eb68dc25b13771811fa7afc2d0b3b90347a57b9.zip | |
Fixed pdb-track on Windows
make-temp-file is returning the temp file path with the wrong type of
slashes.
| -rw-r--r-- | lisp/progmodes/python.el | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index 76901aaa69e..0611a4c9b45 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el | |||
| @@ -1061,6 +1061,17 @@ commands.)" | |||
| 1061 | (message (format "Sent: %s..." | 1061 | (message (format "Sent: %s..." |
| 1062 | (buffer-substring (point-min) | 1062 | (buffer-substring (point-min) |
| 1063 | (line-end-position))))) | 1063 | (line-end-position))))) |
| 1064 | ;; Fix Windows/MS-DOS temp file path | ||
| 1065 | (when (or (eq system-type 'windows-nt) | ||
| 1066 | (eq system-type 'ms-dos) | ||
| 1067 | (eq system-type 'cygwin)) | ||
| 1068 | (setq temp-file | ||
| 1069 | (with-temp-buffer | ||
| 1070 | (insert temp-file) | ||
| 1071 | (goto-char (point-min)) | ||
| 1072 | (while (search-forward "/" nil t) | ||
| 1073 | (replace-match "\\" nil t)) | ||
| 1074 | (buffer-substring (point-min) (point-max))))) | ||
| 1064 | (with-current-buffer (process-buffer process) | 1075 | (with-current-buffer (process-buffer process) |
| 1065 | (setq inferior-python-mode-current-file current-file) | 1076 | (setq inferior-python-mode-current-file current-file) |
| 1066 | (setq inferior-python-mode-current-temp-file temp-file)) | 1077 | (setq inferior-python-mode-current-temp-file temp-file)) |