1
0
Fork 0

Fix env invocation

This commit is contained in:
Andy Wingo 2017-03-06 14:18:37 +00:00
parent 493fe697ba
commit ff529670e1

View file

@ -1,5 +1,5 @@
;; Tekuti
;; Copyright (C) 2008, 2010, 2011, 2012 Andy Wingo <wingo at pobox dot com>
;; Copyright (C) 2008, 2010, 2011, 2012, 2017 Andy Wingo <wingo at pobox dot com>
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the GNU General Public License as
@ -79,7 +79,7 @@
(define (prepend-env args)
(if (null? env)
args
(cons "/run/current-system/profile/bin/env" (append env args))))
(cons "env" (append env args))))
(define (redirect-input args)
(if input-file
(list "/bin/sh" "-c"