From d50e4dedb20054877916191d66d537defb738667 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 30 Mar 2014 02:12:48 -0400 Subject: improved --- Property/Reboot.hs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'Property') diff --git a/Property/Reboot.hs b/Property/Reboot.hs index 668a7a49..63987ad3 100644 --- a/Property/Reboot.hs +++ b/Property/Reboot.hs @@ -3,6 +3,5 @@ module Property.Reboot where import Property import Utility.SafeCommand -{- Use eg, "+5" to reboot in 5 minutes. -} -scheduled :: String -> Property -scheduled rebootwhen = cmdProperty "shutdown" [ Param "-r", Param rebootwhen ] +now -> Property +now = cmdProperty "reboot" [] -- cgit v1.3-2-g0d8e