Added readline support through rlwrap

1 files changed, 8 insertions, 1 deletions

diff --git a/util/scene-runner b/util/scene-runner
index 5d8ce4f..f199eb1 100755
--- a/util/scene-runner
+++ b/util/scene-runner
@@ -4,13 +4,20 @@ mypath="$( dirname $0 )"
 cmd="$mypath/showscene"
 getnext="$mypath/getval _scene"
 
+. "$mypath/common"
+
 scene="$( $getnext )"
 if [ ! "$scene" ]; then
     scene='start'
 fi
 
 while [ "$scene" ]; do
-    $cmd $scene
+    # if rlwrap is found on the system, use it to provide readline capabilities
+    # (which will hopefully prevent ragequits to due re-typing long, mistyped
+    # commands)
+    which rlwrap >/dev/null && {
+        rlwrap -H "$GSGP_PROFILE_PATH/.history" $cmd $scene
+    } || $cmd $scene
 
     # if the scene stated that we should end, then we should probably end
     if [ $? -eq 100 ]; then