diff options
Diffstat (limited to 'pre-inst-env.in')
-rw-r--r-- | pre-inst-env.in | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/pre-inst-env.in b/pre-inst-env.in deleted file mode 100644 index d0aa24c..0000000 --- a/pre-inst-env.in +++ /dev/null @@ -1,37 +0,0 @@ -#! @GUILE@ --no-auto-compile --*- scheme -*- -!# -;;; ccwl --- Concise Common Workflow Language -;;; Copyright © 2021 Arun Isaac <arunisaac@systemreboot.net> -;;; -;;; This file is part of ccwl. -;;; -;;; ccwl is free software: you can redistribute it and/or modify it -;;; under the terms of the GNU General Public License as published by -;;; the Free Software Foundation, either version 3 of the License, or -;;; (at your option) any later version. -;;; -;;; ccwl is distributed in the hope that it will be useful, but -;;; WITHOUT ANY WARRANTY; without even the implied warranty of -;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -;;; General Public License for more details. -;;; -;;; You should have received a copy of the GNU General Public License -;;; along with ccwl. If not, see <https://www.gnu.org/licenses/>. - -(import (ice-9 match)) - -(define (prepend-path-env! name . values) - (setenv name (string-join (append values - (if (getenv name) - (string-split (getenv name) #\:) - '())) - ":"))) - -(prepend-path-env! "GUILE_LOAD_PATH" "@abs_top_builddir@" "@abs_top_srcdir@") -(prepend-path-env! "GUILE_LOAD_COMPILED_PATH" "@abs_top_builddir@") -(prepend-path-env! "PATH" "@abs_top_builddir@/scripts") - -(match (command-line) - ((_ command args ...) - (apply execlp command command args))) |