From ddfc0f1cb2ed818aca038894e00f93cc810b39e6 Mon Sep 17 00:00:00 2001
From: Joseph Bryan <joemfb@gmail.com>
Date: Tue, 6 Sep 2016 15:55:50 -0400
Subject: [PATCH] removes ++ta-cru

---
 lib/drum.hoon | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/lib/drum.hoon b/lib/drum.hoon
index 91e244a9f..a96434b76 100644
--- a/lib/drum.hoon
+++ b/lib/drum.hoon
@@ -305,8 +305,9 @@
 ++  se-belt                                           ::  handle input
   |=  bet/dill-belt
   ^+  +>
-  ?:  ?=({?($hey $rez $yow) *} bet)                   ::  target-agnostic
+  ?:  ?=({?($cru $hey $rez $yow) *} bet)              ::  target-agnostic
     ?-  bet
+      {$cru *}  (se-dump:(se-text (trip p.bet)) q.bet)
       {$hey *}  +>(mir [0 ~])                         ::  refresh
       {$rez *}  +>(edg (dec p.bet))                   ::  resize window
       {$yow *}  ~&([%no-yow -.bet] +>)
@@ -487,12 +488,11 @@
   ++  ta-belt                                         ::  handle input
     |=  bet/dill-belt
     ^+  +>
-    ?<  ?=({?($hey $rez $yow) *} bet)                 ::  target-specific
+    ?<  ?=({?($cru $hey $rez $yow) *} bet)            ::  target-specific
     =.  blt  [q.blt `bet]                             ::  remember belt
     ?-  bet
       {$aro *}  (ta-aro p.bet)
       {$bac *}  ta-bac
-      {$cru *}  (ta-cru p.bet q.bet)
       {$ctl *}  (ta-ctl p.bet)
       {$del *}  ta-del
       {$met *}  (ta-met p.bet)
@@ -564,10 +564,6 @@
             (cat:edit pos.inp (snag (sub num.kil pos.kil) old.kil))
     ==
   ::
-  ++  ta-cru                                          ::  hear crud
-    |=  {lab/@tas tac/(list tank)}
-    +>(+> (se-dump:(se-text (trip lab)) tac))
-  ::
   ++  ta-del                                          ::  hear delete
     ^+  .
     ?:  =((lent buf.say.inp) pos.inp)