summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Reboot.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor/Property/Reboot.hs')
-rw-r--r--src/Propellor/Property/Reboot.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Reboot.hs b/src/Propellor/Property/Reboot.hs
index d3b2d372..84cf3fc6 100644
--- a/src/Propellor/Property/Reboot.hs
+++ b/src/Propellor/Property/Reboot.hs
@@ -103,5 +103,5 @@ kernelsIn d = filter ("vmlinu" `isInfixOf`) <$> dirContents d
-- TODO this is way too crude
extractKernelVersion :: String -> KernelVersion
extractKernelVersion s =
- concat . reverse . drop 1 . reverse . drop 1 $
+ concat . filter (/= "") . reverse . drop 1 . reverse . drop 1 $
split "-" s