From e7c7adc0c4cdc838eada045334b038c7f01dcc56 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 7 Mar 2016 21:51:25 -0400
Subject: add unsupportedOS

---
 src/Propellor/Property/OS.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Propellor/Property/OS.hs')

diff --git a/src/Propellor/Property/OS.hs b/src/Propellor/Property/OS.hs
index 5f1adddb..e5da0921 100644
--- a/src/Propellor/Property/OS.hs
+++ b/src/Propellor/Property/OS.hs
@@ -86,7 +86,7 @@ cleanInstallOnce confirmation = check (not <$> doesFileExist flagfile) $
 	osbootstrapped = withOS (newOSDir ++ " bootstrapped") $ \o -> case o of
 		(Just d@(System (Debian _) _)) -> debootstrap d
 		(Just u@(System (Buntish _) _)) -> debootstrap u
-		_ -> error "os is not declared to be Debian or *buntu"
+		_ -> unsupportedOS
 	
 	debootstrap targetos = ensureProperty $
 		-- Ignore the os setting, and install debootstrap from
-- 
cgit v1.3-2-g0d8e