;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: July 2003
;;;;
-;;;; $Id: classes.lisp,v 1.3 2003/07/18 21:34:18 kevin Exp $
+;;;; $Id: classes.lisp,v 1.4 2003/08/05 23:00:28 kevin Exp $
;;;;
;;;; This file and Wol are Copyright (c) 2001-2003 by Kevin M. Rosenberg
;;;; *************************************************************************
(aserve-server :initarg :aserve-server :reader request-aserve-server)
(host :initarg :host :accessor request-host)
(vhost :initarg :vhost :accessor request-vhost)
+ (desired-query :initform nil :accessor request-desired-query
+ :documentation "type of query alist requested")
(posted-content :initarg :posted-content :accessor request-posted-content)
(headers :initarg :headers :accessor request-headers)
(page :initarg :page :initform nil :accessor request-page)