fraport/fradrive
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

chore: prevent creating nested .stack-work

Browse Source
This commit is contained in:
Gregor Kleen 2021-07-08 15:58:31 +02:00
parent f441d432ab
commit 0b8890d1f2
7 changed files with 28 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
clean.sh
View File

@ -24,15 +24,15 @@ if [[ "${target}" != ".stack-work" ]]; then
move-back() {
if [[ -d .stack-work ]]; then
mv -v .stack-work "${target}"
mv -vT .stack-work "${target}"
else
mkdir -v "${target}"
fi
[[ -d .stack-work-clean ]] && mv -v .stack-work-clean .stack-work
[[ -d .stack-work-clean ]] && mv -vT .stack-work-clean .stack-work
}
mv -v .stack-work .stack-work-clean
mv -v "${target}" .stack-work
mv -vT .stack-work .stack-work-clean
mv -vT "${target}" .stack-work
trap move-back EXIT
fi

8
ghci.sh
View File

@ -16,13 +16,13 @@ unset HOST
move-back() {
mv -v .stack-work .stack-work-ghci
[[ -d .stack-work-build ]] && mv -v .stack-work-build .stack-work
mv -vT .stack-work .stack-work-ghci
[[ -d .stack-work-build ]] && mv -vT .stack-work-build .stack-work
}
if [[ -d .stack-work-ghci ]]; then
[[ -d .stack-work ]] && mv -v .stack-work .stack-work-build
mv -v .stack-work-ghci .stack-work
[[ -d .stack-work ]] && mv -vT .stack-work .stack-work-build
mv -vT .stack-work-ghci .stack-work
trap move-back EXIT
fi

8
haddock.sh
View File

@ -5,13 +5,13 @@ set -e
[ "${FLOCKER}" != "$0" ] && exec env FLOCKER="$0" flock -en .stack-work.lock "$0" "$@" || :
move-back() {
mv -v .stack-work .stack-work-doc
[[ -d .stack-work-build ]] && mv -v .stack-work-build .stack-work
mv -vT .stack-work .stack-work-doc
[[ -d .stack-work-build ]] && mv -vT .stack-work-build .stack-work
}
if [[ -d .stack-work-doc ]]; then
[[ -d .stack-work ]] && mv -v .stack-work .stack-work-build
mv -v .stack-work-doc .stack-work
[[ -d .stack-work ]] && mv -vT .stack-work .stack-work-build
mv -vT .stack-work-doc .stack-work
trap move-back EXIT
fi

8
hlint.sh
View File

@ -5,13 +5,13 @@ set -e
[ "${FLOCKER}" != "$0" ] && exec env FLOCKER="$0" flock -en .stack-work.lock "$0" "$@" || :
move-back() {
mv -v .stack-work .stack-work-test
[[ -d .stack-work-build ]] && mv -v .stack-work-build .stack-work
mv -vT .stack-work .stack-work-test
[[ -d .stack-work-build ]] && mv -vT .stack-work-build .stack-work
}
if [[ -d .stack-work-test ]]; then
[[ -d .stack-work ]] && mv -v .stack-work .stack-work-build
mv -v .stack-work-test .stack-work
[[ -d .stack-work ]] && mv -vT .stack-work .stack-work-build
mv -vT .stack-work-test .stack-work
trap move-back EXIT
fi

8
hoogle.sh
View File

@ -5,13 +5,13 @@ set -e
[ "${FLOCKER}" != "$0" ] && exec env FLOCKER="$0" flock -en .stack-work.lock "$0" "$@" || :
move-back() {
mv -v .stack-work .stack-work-doc
[[ -d .stack-work-build ]] && mv -v .stack-work-build .stack-work
mv -vT .stack-work .stack-work-doc
[[ -d .stack-work-build ]] && mv -vT .stack-work-build .stack-work
}
if [[ -d .stack-work-doc ]]; then
[[ -d .stack-work ]] && mv -v .stack-work .stack-work-build
mv -v .stack-work-doc .stack-work
[[ -d .stack-work ]] && mv -vT .stack-work .stack-work-build
mv -vT .stack-work-doc .stack-work
trap move-back EXIT
fi

8
start.sh
View File

@ -20,13 +20,13 @@ export APPROOT=${APPROOT:-http://localhost:$((${PORT_OFFSET:-0} + 3000))}
unset HOST
move-back() {
mv -v .stack-work .stack-work-run
[[ -d .stack-work-build ]] && mv -v .stack-work-build .stack-work
mv -vT .stack-work .stack-work-run
[[ -d .stack-work-build ]] && mv -vT .stack-work-build .stack-work
}
if [[ -d .stack-work-run ]]; then
[[ -d .stack-work ]] && mv -v .stack-work .stack-work-build
mv -v .stack-work-run .stack-work
[[ -d .stack-work ]] && mv -vT .stack-work .stack-work-build
mv -vT .stack-work-run .stack-work
trap move-back EXIT
fi

8
test.sh
View File

@ -7,13 +7,13 @@ set -e
[ "${FLOCKER}" != "$0" ] && exec env FLOCKER="$0" flock -en .stack-work.lock "$0" "$@" || :
move-back() {
mv -v .stack-work .stack-work-test
[[ -d .stack-work-build ]] && mv -v .stack-work-build .stack-work
mv -vT .stack-work .stack-work-test
[[ -d .stack-work-build ]] && mv -vT .stack-work-build .stack-work
}
if [[ -d .stack-work-test ]]; then
[[ -d .stack-work ]] && mv -v .stack-work .stack-work-build
mv -v .stack-work-test .stack-work
[[ -d .stack-work ]] && mv -vT .stack-work .stack-work-build
mv -vT .stack-work-test .stack-work
trap move-back EXIT
fi