From bdba36ea26d7f521553b0c1e833b5ccf5d25ee96 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 18 May 2015 00:37:50 -0400 Subject: [PATCH] show docs in haddock --- src/Propellor/Property/HostingProvider/DigitalOcean.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Propellor/Property/HostingProvider/DigitalOcean.hs b/src/Propellor/Property/HostingProvider/DigitalOcean.hs index be62ccd..a5de981 100644 --- a/src/Propellor/Property/HostingProvider/DigitalOcean.hs +++ b/src/Propellor/Property/HostingProvider/DigitalOcean.hs @@ -9,7 +9,7 @@ import qualified Propellor.Property.Reboot as Reboot import Data.List --- Digital Ocean does not provide any way to boot +-- | Digital Ocean does not provide any way to boot -- the kernel provided by the distribution, except using kexec. -- Without this, some old, and perhaps insecure kernel will be used. -- @@ -40,7 +40,7 @@ runningInstalledKernel = do findVersion kernelver <$> readProcess "file" ("-L" : kernelimages) --- File output looks something like this, we want to unambiguously +-- | File output looks something like this, we want to unambiguously -- match the running kernel version: -- Linux kernel x86 boot executable bzImage, version 3.16-3-amd64 (debian-kernel@lists.debian.org) #1 SMP Debian 3.1, RO-rootFS, swap_dev 0x2, Normal VGA findVersion :: String -> String -> Bool