Remove redundant warning constructor in snapshot reading

Author: jasagredo

ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Storage/LedgerDB/API.hs

@@ -567,13 +567,13 @@ initialize replayTracer
         -- If the snapshot is missing a metadata file, issue a warning and try
         -- the next oldest snapshot
         Left err@(InitFailureRead (ReadMetadataError _ MetadataFileDoesNotExist)) -> do
-          traceWith snapTracer $ SnapshotMetadataMissing s
+          traceWith snapTracer $ InvalidSnapshot s err
           tryNewestFirst (acc . InitFailure s err) ss
 
         -- If the snapshot's backend is incorrect, issue a warning and try
         -- the next oldest snapshot
         Left err@(InitFailureRead (ReadMetadataError _ MetadataBackendMismatch)) -> do
-          traceWith snapTracer $ SnapshotMetadataBackendMismatch s
+          traceWith snapTracer $ InvalidSnapshot s err
           tryNewestFirst (acc . InitFailure s err) ss
 
         -- If the snapshot has a checksum that doesn't match the actual data,

ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Storage/LedgerDB/Snapshots.hs

@@ -558,8 +558,4 @@ data TraceSnapshotEvent blk
     -- ^ A snapshot was written to disk.
   | DeletedSnapshot DiskSnapshot
     -- ^ An old or invalid on-disk snapshot was deleted
-  | SnapshotMetadataMissing DiskSnapshot
-    -- ^ The metadata file for a snapshot was missing and the snapshot was ignored
-  | SnapshotMetadataBackendMismatch DiskSnapshot
-    -- ^ The backend for a snapshot was incorrect and the snapshot was ignored
   deriving (Generic, Eq, Show)