13 lines
367 B
Common Lisp
13 lines
367 B
Common Lisp
;;;; cl-scopes/web/client - web client functionality
|
|
|
|
(defpackage :scopes/web/client
|
|
(:use :common-lisp)
|
|
(:local-nicknames (:config :scopes/config)
|
|
(:core :scopes/core))
|
|
(:export #:config #:url))
|
|
|
|
(in-package :scopes/web/client)
|
|
|
|
(defclass config (core:service-config)
|
|
((url :reader url :initarg :url :initform "http://localhost:8899")))
|
|
|