From f3b83fd4e4d4329d481e048ad2eae84dd22d7e22 Mon Sep 17 00:00:00 2001
From: Brian Taylor <lbwnet@comcast.net>
Date: Mon, 3 Jul 2023 16:19:13 -0700
Subject: [PATCH] Tidy up sp_shutdown with Cider.

---
 src/main.c | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

diff --git a/src/main.c b/src/main.c
index 70906ca14..3c36990cc 100644
--- a/src/main.c
+++ b/src/main.c
@@ -536,13 +536,16 @@ sp_shutdown(int exitval)
 #ifdef CIDER
     {
         extern int IsCiderLoaded(void);
-        char *cider_quit = getenv("CIDER_COM_QUIT");
+        char *cider_quit_s = NULL;
         bool cider_com_quit = TRUE;
-        if (cider_quit && eq(cider_quit, "OFF")) {
-            cider_com_quit = FALSE;
-        }
-        if (cider_com_quit && IsCiderLoaded() > 0) {
-            com_quit(NULL);
+        if (exitval != EXIT_BAD) {
+            cider_quit_s = getenv("CIDER_COM_QUIT");
+            if (cider_quit_s && *cider_quit_s && eq(cider_quit_s, "OFF")) {
+                cider_com_quit = FALSE;
+            }
+            if (cider_com_quit && IsCiderLoaded() > 0) {
+                com_quit(NULL);
+            }
         }
     }
 #endif