From d2f3977768f5588b9467cc73c12d9a1de204d9e8 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sun, 29 Oct 2017 15:38:20 -0700
Subject: [PATCH] ui.backend.cocoa.views: remove listener touchbar support
 (temporarily).

... it breaks deploys of other UI apps that aren't the listener.
---
 basis/ui/backend/cocoa/views/views.factor | 36 ++++-------------------
 1 file changed, 6 insertions(+), 30 deletions(-)

diff --git a/basis/ui/backend/cocoa/views/views.factor b/basis/ui/backend/cocoa/views/views.factor
index 34785ac748f..a4f51e44560 100644
--- a/basis/ui/backend/cocoa/views/views.factor
+++ b/basis/ui/backend/cocoa/views/views.factor
@@ -2,13 +2,12 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors alien alien.c-types alien.data alien.strings
 arrays assocs cocoa cocoa.application cocoa.classes
-cocoa.pasteboard cocoa.runtime cocoa.subclassing cocoa.touchbar
-cocoa.types cocoa.views combinators core-foundation.strings
-core-graphics core-graphics.types core-text io.encodings.utf8
-kernel literals locals math math.rectangles namespaces opengl
-sequences threads ui.gadgets ui.gadgets.private
-ui.gadgets.worlds ui.gestures ui.private ui.tools.listener
-vocabs.refresh ;
+cocoa.pasteboard cocoa.runtime cocoa.subclassing cocoa.types
+cocoa.views combinators core-foundation.strings core-graphics
+core-graphics.types core-text io.encodings.utf8 kernel literals
+locals math math.rectangles namespaces opengl sequences threads
+ui.gadgets ui.gadgets.private ui.gadgets.worlds ui.gestures
+ui.private ;
 IN: ui.backend.cocoa.views
 
 : send-mouse-moved ( view event -- )
@@ -183,29 +182,6 @@ CONSTANT: selector>action H{
         ] when
     ] ;
 
-    METHOD: void refreshAllAction [
-        [ refresh-all ] \ refresh-all call-listener
-    ] ;
-
-    METHOD: void autoUseAction [
-        [ com-auto-use ] \ com-auto-use call-listener
-    ] ;
-
-    METHOD: Class makeTouchBar [ default-touchbar self make-touchbar ] ;
-
-    METHOD: Class touchBar: Class touchbar makeItemForIdentifier: Class string [
-        string CF>string
-        {
-            { "refresh-all-action" [
-                self "refresh-all-action" "refresh-all" "refreshAllAction" make-NSTouchBar-button
-            ] }
-            { "auto-use-action" [
-                self "auto-use-action" "auto-use" "autoUseAction" make-NSTouchBar-button
-            ] }
-            [ drop f ]
-        } case
-    ] ;
-
     ! Rendering
     METHOD: void drawRect: NSRect rect [ self window [ draw-world ] when* ] ;