|
|
@@ -37,7 +37,7 @@
|
|
|
when (and next-time (<= (same-time-in-chat next-time chat-id) now))
|
|
|
do (unwind-protect
|
|
|
(progn
|
|
|
- (log:info :chat-cron type chat-id schedule now next-time last-run)
|
|
|
+ (log:info :chat-cron type chat-id schedule-text now next-time last-run)
|
|
|
(apply #'run-hooks :chat-cron (keyify type) chat-id schedule (read-from-string args)))
|
|
|
(db-execute "update chat_crons set last_run = ? where type = ? and chat_id = ? and schedule = ? and args = ?" next-time type chat-id schedule-text args)))))
|
|
|
|