From 7bf451618e49e68bce7e9b6a75f09e3e5943df5e Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Fri, 20 May 2016 05:56:21 +0900 Subject: show instance for SbuildSchroot --- src/Propellor/Property/Sbuild.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs index 8c507bd8..cb19d525 100644 --- a/src/Propellor/Property/Sbuild.hs +++ b/src/Propellor/Property/Sbuild.hs @@ -77,6 +77,9 @@ type Suite = String -- the same suite and the same architecture, so neither do we data SbuildSchroot = SbuildSchroot Suite Architecture +instance Show SbuildSchroot where + show (SbuildSchroot suite arch) = suite ++ "-" ++ arch + -- | Build and configure a schroot for use with sbuild using a distribution's -- standard mirror -- -- cgit v1.2.3