From 788ad7bcff61147dbdde484d8d56ff6aead82659 Mon Sep 17 00:00:00 2001 From: FĂ©lix Sipma Date: Fri, 23 Feb 2018 16:33:53 +0100 Subject: add installed property to Openssl --- src/Propellor/Property/Openssl.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/Propellor/Property/Openssl.hs b/src/Propellor/Property/Openssl.hs index eb373e49..1967301c 100644 --- a/src/Propellor/Property/Openssl.hs +++ b/src/Propellor/Property/Openssl.hs @@ -9,6 +9,9 @@ import Utility.FileMode import Utility.SafeCommand +installed :: Property DebianLike +installed = Apt.installed ["openssl"] + dhparamsLength :: Int dhparamsLength = 2048 @@ -18,7 +21,7 @@ dhparams = "/etc/ssl/private/dhparams.pem" safeDhparams :: Property DebianLike safeDhparams = propertyList "safe dhparams" $ props & File.dirExists (takeDirectory file) - & Apt.installed ["openssl"] + & installed & check (not <$> doesFileExist file) (createDhparams file length') createDhparams :: FilePath -> Int -> Property UnixLike -- cgit v1.2.3