1 new commit in scheme:
https://bitbucket.org/xemacs/scheme/commits/0a3b482bdcf4/
Changeset: 0a3b482bdcf4
User: sperber
Date: 2014-05-25 15:33:00
Summary: Use `make-temp-file' instead of constant file name.
2014-05-25 Michael Sperber <mike(a)xemacs.org>
* cmuscheme48.el (scheme48-send-definition): Use `make-temp-file'
instead of a constant file name.
Affected #: 2 files
diff -r 62a6e096935445e80617a634ed30464839aa3107 -r
0a3b482bdcf42c44e0cd05a015499c4781423a2d ChangeLog
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2014-05-25 Michael Sperber <mike(a)xemacs.org>
+
+ * cmuscheme48.el (scheme48-send-definition): Use `make-temp-file'
+ instead of a constant file name.
+
2014-05-15 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.21 released.
diff -r 62a6e096935445e80617a634ed30464839aa3107 -r
0a3b482bdcf42c44e0cd05a015499c4781423a2d cmuscheme48.el
--- a/cmuscheme48.el
+++ b/cmuscheme48.el
@@ -77,7 +77,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)))))
Repository URL:
https://bitbucket.org/xemacs/scheme/
--
This is a commit notification from
bitbucket.org. You are receiving
this because you have the service enabled, addressing the recipient of
this email.
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches