summaryrefslogtreecommitdiff
path: root/Property/Reboot.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Property/Reboot.hs')
-rw-r--r--Property/Reboot.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/Property/Reboot.hs b/Property/Reboot.hs
new file mode 100644
index 00000000..668a7a49
--- /dev/null
+++ b/Property/Reboot.hs
@@ -0,0 +1,8 @@
+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 ]