summaryrefslogtreecommitdiff
path: root/lang/scsh/files/patch-ae
blob: f7eec1bab76986a3859143b5d8fb1926fdc2c954 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
*** scsh/scsh.scm.original   Tue Nov 26 17:15:00 1996
--- scsh/scsh.scm    Tue Nov 26 17:15:06 1996
***************
*** 298,304 ****
               (list (string-append (car maybe-prefix) ".~a"))))))

  (define *temp-file-template*
!   (make-fluid (string-append "/usr/tmp/" (number->string (pid)) ".~a")))


  (define (temp-file-iterate maker . maybe-template)
--- 298,304 ----
               (list (string-append (car maybe-prefix) ".~a"))))))

  (define *temp-file-template*
!   (make-fluid (string-append "/var/tmp/" (number->string (pid)) ".~a")))


  (define (temp-file-iterate maker . maybe-template)