Fix a couple of new warnings

src/Arguments.hs

@@ -3,7 +3,6 @@ module Arguments (Arguments(..), args) where
 import Data.Functor.Both
 import qualified Prelude as P
 import Prelude
-import Prologue
 import qualified Renderer as R
 
 -- | The command line arguments to the application.

src/DiffSummary.hs

@@ -165,7 +165,7 @@ toTermName source term = case unwrap term of
         toArgName :: (HasCategory leaf, HasField fields Category, HasField fields Range) => Term leaf (Record fields) -> Text
         toArgName arg = case identifiable arg of
                           Identifiable arg -> toTermName' arg
-                          Unidentifiable arg -> "..."
+                          Unidentifiable _ -> "..."
 
 maybeParentContext :: Maybe (Category, Text) -> Doc
 maybeParentContext = maybe "" (\annotation ->