commit a8de6492f20d207f49172a67a56cc66cf4f0511f
parent a0a2fbc29ce7fe51cb5a9c87a5cd0248b652d7bd
Author: Tomas Hlavaty <tom@logand.com>
Date: Sat, 10 Aug 2013 23:30:42 +0200
really use some attributes for print-job, spec says so
Diffstat:
| M | ipp.lisp | | | 28 | ++++++++++++++-------------- |
1 file changed, 14 insertions(+), 14 deletions(-)
diff --git a/ipp.lisp b/ipp.lisp
@@ -303,13 +303,13 @@
(requesting-user-name (user-name))
job-name
(ipp-attribute-fidelity t)
- ;; document-name
- ;; document-format
- ;; document-natural-language
- ;; compression
- ;; job-k-octets
- ;; job-impressions
- ;; job-media-sheets
+ document-name
+ document-format
+ document-natural-language
+ compression
+ job-k-octets
+ job-impressions
+ job-media-sheets
copies
sides)
(ipp ipp-client
@@ -327,13 +327,13 @@
:requesting-user-name ,requesting-user-name
:job-name ,job-name
:ipp-attribute-fidelity ,ipp-attribute-fidelity
- ;; :document-name ,document-name
- ;; :document-format ,document-format
- ;; :document-natural-language ,document-natural-language
- ;; :compression ,compression
- ;; :job-k-octets ,job-k-octets
- ;; :job-impressions ,job-impressions
- ;; :job-media-sheets ,job-media-sheets
+ :document-name ,document-name
+ :document-format ,document-format
+ :document-natural-language ,document-natural-language
+ :compression ,compression
+ :job-k-octets ,job-k-octets
+ :job-impressions ,job-impressions
+ :job-media-sheets ,job-media-sheets
:copies ,copies
:sides ,sides))))
