|
@@ -106,7 +106,8 @@
|
|
|
(gethash chat-id *nalunch/jars*) cookie-jar)))
|
|
(gethash chat-id *nalunch/jars*) cookie-jar)))
|
|
|
(progn
|
|
(progn
|
|
|
(log:warn "nalunch no login/pass for" chat-id)
|
|
(log:warn "nalunch no login/pass for" chat-id)
|
|
|
- (lists-set-entry :nalunch chat-id nil))))))
|
|
|
|
|
|
|
+;; (lists-set-entry :nalunch chat-id nil) ;; Comment out for now
|
|
|
|
|
+ )))))
|
|
|
|
|
|
|
|
;; Hooks
|
|
;; Hooks
|
|
|
(def-message-cmd-handler handle-cmd-nalunch (:nalunch)
|
|
(def-message-cmd-handler handle-cmd-nalunch (:nalunch)
|