|
|
@@ -119,9 +119,7 @@
|
|
|
#'(lambda (diff)
|
|
|
(bot-send-message (format-balance-left (user-balance)))
|
|
|
(process-new diff))
|
|
|
- :key #'(lambda (tr)
|
|
|
- (local-time:timestamp-to-universal
|
|
|
- (local-time:parse-timestring (agets tr "time"))))))
|
|
|
+ :key #'pta-ledger:entry-date))
|
|
|
|
|
|
;; Hooks
|
|
|
(defun handle-set-cron (enable)
|