No OneTemporary
Actions

Size

617 B

Referenced Files

None

Subscribers

None

View Options

	diff --git a/Wearg/Time.tcl b/Wearg/Time.tcl
	new file mode 100644
	index 0000000..8294a3b
	--- /dev/null
	+++ b/Wearg/Time.tcl
	@@ -0,0 +1,21 @@
	+#bind cron - "* * * * *" cron:minute
	+bind cron - "?2 * * * *" cron:often
	+bind cron - "?7 * * * *" cron:often
	+#bind cron - "0 * * * *" cron:hourly
	+#bind cron - "0 4 * * *" cron:daily
	+
	+#Every 5 minutes
	+proc cron:often {minute hour day month weekday} {
	+ #Reconnects to broker
	+ if {[mq connected]} {
	+ mq disconnect
	+ }
	+}
	+
	+#Every hour
	+proc cron:hourly {minute hour day month weekday} {
	+}
	+
	+#Every day, at 4am
	+proc cron:daily {minute hour day month weekday} {
	+}