bark: stop handling old summary response types

Growl isn't actually live on any ships yet, so we do not need to account
for this case.

desk/app/bark.hoon

@@ -70,7 +70,6 @@
       !<  %-  unit
           $:  requested=time
           $=  summary
-          $^  carpet:hark
           ::NOTE  see also /lib/summarize
           $%  [%life active=[s=@ud r=@ud g=@t] inactive=[d=@ud c=@ud g=@t c=@t]]
           ==  ==
@@ -82,11 +81,7 @@
     :~  :*  %pass  /save-summary/(scot %p src.bowl)/(scot %da requested.u.result)
         %arvo  %k  %fard
         %bark  %save-summary  %noun
-        =;  summary
-          !>(`[tlon-api-key mailchimp-api-key src.bowl summary])
-        ?@  -.summary.u.result
-          summary.u.result
-        [%hark summary.u.result]
+        !>(`[tlon-api-key mailchimp-api-key src.bowl summary.u.result])
       ==
     ==
   ==

desk/ted/save-summary.hoon

@@ -17,8 +17,7 @@
       =ship
     ::
       $=  summary
-      $%  [%hark =carpet:hark]
-          [%life [sen=@ud rec=@ud gro=@t] [dms=@ud etc=@ud group=@t chat=@t]]
+      $%  [%life [sen=@ud rec=@ud gro=@t] [dms=@ud etc=@ud group=@t chat=@t]]
       ==
   ==
 =/  args  !<([~ arg-mold] arg)