cl-ipp

Internet Printing Protocol (IPP) for Common Lisp
git clone https://logand.com/git/cl-ipp.git/
Log | Files | Refs

commit d4776dd8498cda8ddb31670fdcf471add6b8fd24
parent 2f70e1c133ffad7b5d33ca7775b1f3f06185e891
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sun, 11 Aug 2013 16:27:15 +0200

more attributes listed

Diffstat:
Mipp.lisp | 25++++++++++++++++++++++++-
1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/ipp.lisp b/ipp.lisp @@ -109,7 +109,30 @@ (:completed . nil) ;; TODO (:not-completed . nil) ;; TODO (:my-jobs . nil) ;; TODO - ))) + (:printer-icons . nil) ;; TODO + (:printer-is-shared . nil) ;; TODO + (:printer-more-info . nil) ;; TODO + (:printer-op-policy . nil) + (:printer-state . nil) + (:printer-state-change-time . nil) + (:printer-state-message . nil) + (:printer-type . nil) + (:printer-up-time . nil) + (:printer-uri-supported . nil) + (:queued-job-count . nil) + (:uri-authentication-supported . nil) + (:requesting-user-name . nil) + (:uri-security-supported . nil) + (:printer-name . nil) + (:printer-location . nil) + (:printer-info . nil) + (:printer-uuid . nil) + (:job-quota-period . nil) + (:printer-state-reasons . nil) + (:job-k-limit . nil) + (:job-page-limit . nil) + (:job-sheets-default . nil) + (:device-uri . nil)))) (defun attribute-tag (attribute) (or (cdr (assoc attribute attributes))