X-Git-Url: http://christophe.rhodes.io/gitweb/?p=swankr.git;a=blobdiff_plain;f=swank.R;h=cb13210f87e9badfd929d49e9cfdec3dea25564a;hp=2d2bf779cdb126f8a62af59429d0156257bedc5f;hb=a1e0693d3c4f21f3ad4b298a6b114dcb7c8770f8;hpb=aa3a57d293ce702db333a322ca3676862846b602

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