termux-packages/packages/gauche/src-libsys.scm.patch

12 lines
466 B
Diff
Raw Normal View History

2021-12-19 01:03:55 +01:00
--- a/src/libsys.scm
+++ b/src/libsys.scm
@@ -447,7 +447,7 @@
;; potential security risk. We mimic it's behavior by mkstemp() if possible.
(define-cproc sys-tmpnam ()
(.if "HAVE_MKSTEMP"
- (let* ([nam::(.array char [*]) "/tmp/fileXXXXXX"] [fd::int])
+ (let* ([nam::(.array char [*]) "@TERMUX_PREFIX@/tmp/fileXXXXXX"] [fd::int])
(SCM_SYSCALL fd (mkstemp nam))
(when (< fd 0) (Scm_SysError "mkstemp failed"))
(close fd)