mirror of
https://github.com/snoyberg/keter.git
synced 2024-12-13 19:28:17 +03:00
commit
e0dcefb1f2
@ -117,7 +117,7 @@ instance Show LogMessage where
|
|||||||
]
|
]
|
||||||
show SanityChecksPassed = "Sanity checks passed"
|
show SanityChecksPassed = "Sanity checks passed"
|
||||||
show (ReservingHosts app hosts) = "Reserving hosts for app " ++ show app ++ ": " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
show (ReservingHosts app hosts) = "Reserving hosts for app " ++ show app ++ ": " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
||||||
show (ForgetingReservations app hosts) = "Forgeting host reservations for app " ++ show app ++ ": " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
show (ForgetingReservations app hosts) = "Forgetting host reservations for app " ++ show app ++ ": " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
||||||
show (ActivatingApp app hosts) = "Activating app " ++ show app ++ " with hosts: " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
show (ActivatingApp app hosts) = "Activating app " ++ show app ++ " with hosts: " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
||||||
show (DeactivatingApp app hosts) = "Deactivating app " ++ show app ++ " with hosts: " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
show (DeactivatingApp app hosts) = "Deactivating app " ++ show app ++ " with hosts: " ++ unwords (map (unpack . original) $ Set.toList hosts)
|
||||||
show (ReactivatingApp app old new) = concat
|
show (ReactivatingApp app old new) = concat
|
||||||
|
Loading…
Reference in New Issue
Block a user