11 lines
407 B
Diff
11 lines
407 B
Diff
--- a/emacs/cmuscheme48.el 2012-12-28 01:43:30.000000000 +0900
|
|
+++ b/emacs/cmuscheme48.el 2016-07-05 20:06:19.200173816 +0900
|
|
@@ -58,7 +58,7 @@
|
|
(let ((end (point)))
|
|
(beginning-of-defun)
|
|
(if losep
|
|
- (let ((loser "/tmp/s48lose.tmp"))
|
|
+ (let ((loser (make-temp-file "s48lose")))
|
|
(write-region (point) end loser)
|
|
(scheme48-load-file loser))
|
|
(scheme48-send-region (point) end)))))
|