From 85fbd9e5cd50af269b0c6856ee0361eb46681c25 Mon Sep 17 00:00:00 2001
From: Alexander Rosenberg <zanderpkg@pm.me>
Date: Thu, 5 Sep 2024 16:41:04 -0700
Subject: [PATCH] Update truth-table-web-wrapper

---
 truth-table-web-wrapper | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/truth-table-web-wrapper b/truth-table-web-wrapper
index d2edcb6..f15f282 100755
--- a/truth-table-web-wrapper
+++ b/truth-table-web-wrapper
@@ -1,7 +1,9 @@
 #!/bin/sh
 
+SBCL=${SBCL:-sbcl}
+
 # Use Quicklisp instead of ASDF to silence the output
-exec sbcl --noinform \
-          --eval '(format *error-output* "Loading systems...~%")' \
-          --eval '(ql:quickload :truth-table/web :silent t)' \
-          --eval '(truth-table/web:toplevel)' "${@}"
+exec ${SBCL} --noinform \
+             --eval '(format *error-output* "Loading systems...~%")' \
+             --eval '(ql:quickload :truth-table/web :silent t)' \
+             --eval '(truth-table/web:toplevel)' "${@}"