commit d4776dd8498cda8ddb31670fdcf471add6b8fd24 parent 2f70e1c133ffad7b5d33ca7775b1f3f06185e891 Author: Tomas Hlavaty <tom@logand.com> Date: Sun, 11 Aug 2013 16:27:15 +0200 more attributes listed Diffstat:
M | ipp.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))