Factor jEdit plugin!

[factor.git] / library / platform / jvm / listener.factor

diff --git a/library/platform/jvm/listener.factor b/library/platform/jvm/listener.factor
index cbd9d3c0148a7a47c81e09a16d2f654e7cac3fc5..f332192848b09fbcd1d6ebd285865b21416ef1ce 100644 (file)
--- a/library/platform/jvm/listener.factor
+++ b/library/platform/jvm/listener.factor
@@ -143,28 +143,12 @@ USE: unparser
         [ this fwrite "\n" this fwrite ] "fprint" set
     ] extend ;
 
-: close-listener ( listener -- )
-    #! Closes the listener. If no more listeners remain, the
-    #! desktop exits.
-    "desktop" get
-    [ "factor.listener.FactorListener" ]
-    "factor.listener.FactorDesktop" "closeListener"
-    jinvoke ;
-
 : new-listener-hook ( listener -- )
-    #! Called when user opens a new listener in the desktop.
+    #! Called when user opens a new listener
     <namespace> [
         dup "listener" set
         <listener-stream> "stdio" set
+        print-banner
+        room.
         interpreter-loop
-        "listener" get close-listener
     ] bind ;
-
-: new-listener ( -- )
-    #! Opens a new listener.
-    "desktop" get
-    [ ] "factor.listener.FactorDesktop" "newListener"
-    jinvoke ;
-
-: running-desktop? ( -- )
-    this "factor.listener.FactorDesktop" is ;