[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Fix lilypond-invoke-editor's temp dir (issue 234900043 by address@hi
From: |
trueroad |
Subject: |
Re: Fix lilypond-invoke-editor's temp dir (issue 234900043 by address@hidden) |
Date: |
Mon, 04 May 2015 10:08:42 +0000 |
Reviewers: J_lowe,
Message:
I've pushed to staging branch.
http://git.savannah.gnu.org/gitweb/?p=lilypond.git;a=commit;h=f758afb1497e9d95e564844363f23efa5a313321
Description:
Fix lilypond-invoke-editor's temp dir
To use environment variable TMP and TEMP is
Windows-only conventions.
The POSIX convention is
to look in the TMPDIR.
Please review this at https://codereview.appspot.com/234900043/
Affected files (+6, -3 lines):
M scripts/lilypond-invoke-editor.scm
Index: scripts/lilypond-invoke-editor.scm
diff --git a/scripts/lilypond-invoke-editor.scm
b/scripts/lilypond-invoke-editor.scm
index
313d6cc8dc3acab9c56a7cac124e09c518850695..6658f50166dfe4d98f56d2d2aad068d4e291f864
100644
--- a/scripts/lilypond-invoke-editor.scm
+++ b/scripts/lilypond-invoke-editor.scm
@@ -151,9 +151,12 @@ Options:
(if (running-from-gui?)
(redirect-port (current-error-port)
(open-file (string-append
- (or (getenv "TMP")
- (getenv "TEMP")
- "/tmp")
+ (if (string-match "^(Windows|CYGWIN)"
+ (utsname:sysname
(uname)))
+ (or (getenv "TMP")
+ (getenv "TEMP"))
+ (or (getenv "TMPDIR")
+ "/tmp"))
"/lilypond-invoke-editor.log") "a")))
(if (not (= (length files) 1))
(begin