diff --git a/src/elm/Pages/Build/View.elm b/src/elm/Pages/Build/View.elm
index e3c599fd1..e995e3020 100644
--- a/src/elm/Pages/Build/View.elm
+++ b/src/elm/Pages/Build/View.elm
@@ -595,7 +595,7 @@ viewBuildServices model msgs org repo buildNumber =
 viewService : PartialModel a -> Msgs msg -> RepoModel -> Service -> Html msg
 viewService model msgs rm service =
     div
-        [ serviceClasses
+        [ class "service"
         , Util.testAttribute "service"
         ]
         [ div [ class "-status" ]
@@ -604,13 +604,6 @@ viewService model msgs rm service =
         ]
 
 
-{-| serviceClasses : returns css classes for a particular service
--}
-serviceClasses : Html.Attribute msg
-serviceClasses =
-    classList [ ( "service", True ) ]
-
-
 {-| viewServiceDetails : renders build services detailed information
 -}
 viewServiceDetails : PartialModel a -> Msgs msg -> RepoModel -> Service -> Html msg
@@ -875,13 +868,12 @@ viewLogLinks chunk =
         splitIntersperseConcat : String -> List String -> List String
         splitIntersperseConcat sep list =
             list
-                |> List.map
+                |> List.concatMap
                     (\x ->
                         x
                             |> String.split sep
                             |> List.intersperse sep
                     )
-                |> List.concat
 
         -- split the "line" by escape characters
         split =
diff --git a/src/elm/Pages/Schedules/Form.elm b/src/elm/Pages/Schedules/Form.elm
index 472e5633d..357939de9 100644
--- a/src/elm/Pages/Schedules/Form.elm
+++ b/src/elm/Pages/Schedules/Form.elm
@@ -7,7 +7,6 @@ Use of this source code is governed by the LICENSE file in this repository.
 module Pages.Schedules.Form exposing
     ( viewEnabledCheckbox
     , viewHelp
-    , viewInput
     , viewNameInput
     , viewSubmitButtons
     , viewValueInput
@@ -73,23 +72,6 @@ viewNameInput val disable =
         ]
 
 
-{-| viewInput : renders value input box
--}
-viewInput : String -> String -> String -> Html Msg
-viewInput name val placeholder_ =
-    section [ class "form-control", class "-stack" ]
-        [ label [ class "form-label", for <| name ] [ strong [] [ text name ] ]
-        , input
-            [ value val
-            , onInput <| OnChangeStringField name
-            , class "schedule-name"
-            , placeholder placeholder_
-            , id name
-            ]
-            []
-        ]
-
-
 {-| viewValueInput : renders value input box
 -}
 viewValueInput : String -> String -> Html Msg
diff --git a/src/elm/Pages/Schedules/Update.elm b/src/elm/Pages/Schedules/Update.elm
index f7ef6ac52..9ba5042f7 100644
--- a/src/elm/Pages/Schedules/Update.elm
+++ b/src/elm/Pages/Schedules/Update.elm
@@ -6,8 +6,6 @@ Use of this source code is governed by the LICENSE file in this repository.
 
 module Pages.Schedules.Update exposing
     ( init
-    , onChangeEnable
-    , onChangeStringField
     , reinitializeScheduleAdd
     , reinitializeScheduleUpdate
     , update
diff --git a/src/elm/Pages/Schedules/View.elm b/src/elm/Pages/Schedules/View.elm
index 3399dff7a..edecdec28 100644
--- a/src/elm/Pages/Schedules/View.elm
+++ b/src/elm/Pages/Schedules/View.elm
@@ -48,7 +48,6 @@ import Vela
         , Schedule
         , Schedules
         , SchedulesModel
-        , SecretType(..)
         )