From: Mark Wooding <mdw@distorted.org.uk>
Date: Thu, 11 Jul 2024 11:23:35 +0000 (+0100)
Subject: dot/shell-rc: Relax the hard dependency on `rlwrap'.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/commitdiff_plain/ea5300d6b18725e20263221fd373cf0612d17748

dot/shell-rc: Relax the hard dependency on `rlwrap'.
---

diff --git a/dot/shell-rc b/dot/shell-rc
index 5251e98..778bd3e 100644
--- a/dot/shell-rc
+++ b/dot/shell-rc
@@ -230,13 +230,18 @@ alias gdb="gdb -q"
 
 ## Shut up Lisp interpreters.
 alias clisp="clisp -q -q"
-alias cmucl="rlwrap cmucl -quiet"
-alias ecl="rlwrap ecl"
-alias sbcl="rlwrap sbcl --noinform"
-alias ccl="rlwrap ccl"
-alias ccl32="rlwrap ccl32"
-alias ccl64="rlwrap ccl64"
-alias abcl="rlwrap abcl --noinform"
+if command -v ionice >/dev/null 2>&1; then
+  alias maybe-rlwrap="rlwrap"
+else
+  alias maybe-rlwrap=""
+fi
+alias cmucl="maybe-rlwrap cmucl -quiet"
+alias ecl="maybe-rlwrap ecl"
+alias sbcl="maybe-rlwrap sbcl --noinform"
+alias ccl="maybe-rlwrap ccl"
+alias ccl32="maybe-rlwrap ccl32"
+alias ccl64="maybe-rlwrap ccl64"
+alias abcl="maybe-rlwrap abcl --noinform"
 
 ###--------------------------------------------------------------------------
 ### Colour output.