From a1e0693d3c4f21f3ad4b298a6b114dcb7c8770f8 Mon Sep 17 00:00:00 2001
From: Christophe Rhodes <csr21@cantab.net>
Date: Thu, 9 Sep 2010 16:31:17 +0100
Subject: [PATCH] implement `swank:quit-inspector`

---
 swank.R | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/swank.R b/swank.R
index 2d2bf77..cb13210 100644
--- a/swank.R
+++ b/swank.R
@@ -536,3 +536,7 @@ emacsInspect.list <- function(list) {
            names(list), list))
 }
 
+`swank:quit-inspector` <- function(slimeConnection, sldbState) {
+  resetInspector(slimeConnection)
+  FALSE
+}
-- 
2.39.5