github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-12-23 11:14:57 +00:00
Code Issues Projects Releases Packages Wiki Activity

Run all commands with LC_ALL=C to suppress localisation

Browse source 
See #2581
This commit is contained in:
Steve Purcell 2015-03-11 07:52:01 +00:00
parent 3618b967b1
commit 383cd57a1a
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
package-build.el
View file

@ -220,9 +220,11 @@ be identical."
Output is written to the current buffer." Output is written to the current buffer."
(let* ((default-directory (file-name-as-directory (or dir default-directory))) (let* ((default-directory (file-name-as-directory (or dir default-directory)))
(timeout (number-to-string package-build-timeout-secs)) (timeout (number-to-string package-build-timeout-secs))
(argv (if package-build-timeout-executable (argv (append
'("env" "LC_ALL=C")
(if package-build-timeout-executable
(append (list package-build-timeout-executable "-k" "60" timeout command) args) (append (list package-build-timeout-executable "-k" "60" timeout command) args)
(cons command args)))) (cons command args)))))
(unless (file-directory-p default-directory) (unless (file-directory-p default-directory)
(error "Can't run process in non-existent directory: %s" default-directory)) (error "Can't run process in non-existent directory: %s" default-directory))
(let ((exit-code (apply 'process-file (car argv) nil (current-buffer) t (cdr argv)))) (let ((exit-code (apply 'process-file (car argv) nil (current-buffer) t (cdr argv))))