Remove unused code.

src/App/ZoneInterface.purs

@@ -105,8 +105,7 @@ data Update_MODAL_Form
   | Update_MODAL_Port      Port
 
 data Update_SRR_Form
-  = Update_SRR_Type      Int
-  | Update_SRR_Domain    RecordName
+  = Update_SRR_Domain    RecordName
   | Update_SRR_TTL       TTL
   | Update_SRR_Target    RecordTarget
 
@@ -494,9 +493,6 @@ handleAction = case _ of
 
   UpdateLocalForm rr_id form -> case form of
     Update_Local_Form_SRR rr_update -> case rr_update of
-      Update_SRR_Type val -> do
-        let new_type = fromMaybe "unknown" (baseRecords A.!! val)
-        H.raise $ Log $ SimpleLog ("TODO: Update local RR " <> show rr_id <> " type: " <> new_type)
       Update_SRR_Domain val -> do
         -- H.raise $ Log $ SimpleLog ("Update local RR " <> show rr_id <> " name: " <> val)
         state <- H.get