From: Christophe Rhodes <csr21@cantab.net>
Date: Thu, 9 Sep 2010 15:31:17 +0000 (+0100)
Subject: implement `swank:quit-inspector`
X-Git-Url: http://christophe.rhodes.io/gitweb/?p=swankr.git;a=commitdiff_plain;h=a1e0693d3c4f21f3ad4b298a6b114dcb7c8770f8

implement `swank:quit-inspector`
---

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
+}