From 544ad71f3fce7d394945b447fcaf938d8067c5b3 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 6 Apr 2017 19:43:48 -0400 Subject: listed property should work on !Linux --- src/Propellor/Property/Fstab.hs | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/src/Propellor/Property/Fstab.hs b/src/Propellor/Property/Fstab.hs index 7bf18726..8196377f 100644 --- a/src/Propellor/Property/Fstab.hs +++ b/src/Propellor/Property/Fstab.hs @@ -16,10 +16,9 @@ import Utility.Table -- | Ensures that contains a line mounting the specified -- `Source` on the specified `MountPoint`. -listed :: FsType -> Source -> MountPoint -> MountOpts -> Property Linux -listed fs src mnt opts = tightenTargets $ - "/etc/fstab" `File.containsLine` l - `describe` (mnt ++ " mounted by fstab") +listed :: FsType -> Source -> MountPoint -> MountOpts -> Property UnixLike +listed fs src mnt opts = "/etc/fstab" `File.containsLine` l + `describe` (mnt ++ " mounted by fstab") where l = intercalate "\t" [src, mnt, fs, formatMountOpts opts, dump, passno] dump = "0" -- cgit v1.2.3