diff --git a/pusher.lisp b/pusher.lisp index fde60cc..1294be3 100644 --- a/pusher.lisp +++ b/pusher.lisp @@ -64,8 +64,8 @@ on page load") :accessor push-default-sessions :initarg :default-sessions :initform :acceptor-sessions - :type '(member :current-session :acceptor-sessions - :acceptor-sessions-except-current) + :type (member :current-session :acceptor-sessions + :acceptor-sessions-except-current) :documentation "If a push function is called and the hunchentoot sessions are not specified, this will determine which in sessions the push call happens on the client side.")) diff --git a/smackjack.lisp b/smackjack.lisp index 48b006c..7952744 100644 --- a/smackjack.lisp +++ b/smackjack.lisp @@ -22,14 +22,14 @@ :accessor http-method :initarg :method :initform :get - :type '(member :post :get) + :type (member :post :get) :documentation "http method of the lisp ajax function") (callback-data :accessor callback-data :initarg :callback-data :initform :response-xml - :type '(member :request-object :response-xml :response-text - :response-xml-text :json) + :type (member :request-object :response-xml :response-text + :response-xml-text :json) :documentation "argument passed to callback function from ajax response. Content-type should correspond.") (content-type