|
|
|
|
@ -435,7 +435,8 @@
|
|
|
|
|
(define session-cookie-setter (make-parameter
|
|
|
|
|
(lambda (sid)
|
|
|
|
|
(set-cookie! (session-cookie-name) sid))))
|
|
|
|
|
(session-lifetime (* 60 60 24 7 4))
|
|
|
|
|
;; TODO make cookie last forever
|
|
|
|
|
(session-lifetime (* 60 60 60 24 7 4))
|
|
|
|
|
|
|
|
|
|
;; (access-log (current-output-port))
|
|
|
|
|
(access-log "access.log")
|
|
|
|
|
@ -2244,8 +2245,8 @@
|
|
|
|
|
(for-each (lambda (from-player)
|
|
|
|
|
(when (not (eq? player from-player))
|
|
|
|
|
(when (not (player-has-asset? 'harvester from-player))
|
|
|
|
|
((make-player-stat equipment -2000) from-player)
|
|
|
|
|
((make-player-stat equipment 2000) player)
|
|
|
|
|
((make-player-stat 'equipment -2000) from-player)
|
|
|
|
|
((make-player-stat 'equipment 2000) player)
|
|
|
|
|
(safe-set! (player-cash from-player)
|
|
|
|
|
(- (player-cash from-player) 2000))
|
|
|
|
|
(safe-set! (player-cash player)
|
|
|
|
|
@ -2743,3 +2744,25 @@
|
|
|
|
|
;; Error: (mailbox-send!) bad argument type - not a mailbox: "redhead91
|
|
|
|
|
|
|
|
|
|
;; farmers luck can cause display cash to be out of sync
|
|
|
|
|
|
|
|
|
|
;; start of fruit harvest
|
|
|
|
|
;; error:Server error:
|
|
|
|
|
;; Error: unbound variable: equipment
|
|
|
|
|
|
|
|
|
|
;; last month of december and i had a harvester, chris has a tractor and i don't
|
|
|
|
|
;; error:Server error:
|
|
|
|
|
;; Error: unbound variable: equipment
|
|
|
|
|
|
|
|
|
|
;; when landing on farmers fate drew IRS
|
|
|
|
|
;; Error: unbound variable: equipment
|
|
|
|
|
|
|
|
|
|
;; Call history:
|
|
|
|
|
|
|
|
|
|
;; farm.scm:1896: websockets#send-message
|
|
|
|
|
;; farm.scm:1885: k6114
|
|
|
|
|
;; farm.scm:1885: g6118
|
|
|
|
|
;; farm.scm:1891: log-error
|
|
|
|
|
;; farm.scm:1162: spiffy#error-log
|
|
|
|
|
;; farm.scm:1162: with-output-to-file
|
|
|
|
|
;; farm.scm:1164: print-call-chain <--
|
|
|
|
|
;; #<condition: (exn i/o net)>
|
|
|
|
|
|
