mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix format of show instance

Browse source 
It's only used to show test suite failures..
This commit is contained in:
Joey Hess 2019-01-09 13:12:25 -04:00
parent 2d46038754
commit 11f4d993b5
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Logs/Presence/Pure.hs
View file

@ -29,7 +29,7 @@ data LogLine = LogLine
} deriving (Eq) } deriving (Eq)
instance Show LogLine where instance Show LogLine where
show l = "LogLine " ++ formatVectorClock (date l) ++ show (status l) ++ " " ++ show (info l) show l = "LogLine " ++ formatVectorClock (date l) ++ " " ++ show (status l) ++ " " ++ show (info l)
data LogStatus = InfoPresent | InfoMissing | InfoDead data LogStatus = InfoPresent | InfoMissing | InfoDead
deriving (Eq, Show, Bounded, Enum) deriving (Eq, Show, Bounded, Enum)