Commit da350072 authored by Dave Griffiths's avatar Dave Griffiths
Browse files

setting up server

parent ae129422
...@@ -157,7 +157,7 @@ ...@@ -157,7 +157,7 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; syncing code ;; syncing code
(define url "http://192.168.2.1:8888/mongoose?") (define url "http://192.168.2.1:8888/symbai?")
(define (build-url-from-ktv ktv) (define (build-url-from-ktv ktv)
(string-append "&" (ktv-key ktv) ":" (ktv-type ktv) "=" (stringify-value-url ktv))) (string-append "&" (ktv-key ktv) ":" (ktv-type ktv) "=" (stringify-value-url ktv)))
......
...@@ -130,6 +130,6 @@ ...@@ -130,6 +130,6 @@
#:listen-ip "192.168.2.1" #:listen-ip "192.168.2.1"
#:port (string->number (command-line #:args (port) port)) #:port (string->number (command-line #:args (port) port))
#:command-line? #t #:command-line? #t
#:servlet-path "/mongoose" #:servlet-path "/symbai"
#:server-root-path #:server-root-path
(build-path "client")) (build-path "client"))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment