aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEuAndreh <eu@euandre.org>2022-10-25 00:16:18 -0300
committerEuAndreh <eu@euandre.org>2022-10-25 00:16:18 -0300
commit5763cf89b4424ce9fa4c2e4dac2c2f18a29fd65a (patch)
tree331b3e7323b1fcfeb677013ab11d1fa18e426ad9
parentbin/cl: Grow "$@" at the beginning (diff)
downloaddotfiles-5763cf89b4424ce9fa4c2e4dac2c2f18a29fd65a.tar.gz
dotfiles-5763cf89b4424ce9fa4c2e4dac2c2f18a29fd65a.tar.xz
bin/cl: Allow "--" to flow to underlying Lisp command
-rwxr-xr-xbin/cl6
1 files changed, 5 insertions, 1 deletions
diff --git a/bin/cl b/bin/cl
index ee75b9a..12de987 100755
--- a/bin/cl
+++ b/bin/cl
@@ -176,7 +176,11 @@ while getopts 'e:f:pM:I:nvlh' flag; do
;;
esac
done
-shift $((OPTIND - 1))
+
+shift $((OPTIND - 2))
+if [ "$1" != '--' ]; then
+ shift
+fi
PRESERVE_ARGS=false
INTERACTIVE=true