blob: 5aeada74d90bf4276063cd34bf2900daefd808b1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
loadVirtualPrograms [list "virtual-programs/print.folk"]
Assert $::thisNode claims printer my-printer is a cups printer with url "ipp://10.3.2.20/ipp/print" driver "everywhere"
Assert $::thisNode claims printer my-printer can print double-sided a4 paper
Assert $::thisNode claims printer my-printer can print single-sided letter paper
Assert $::thisNode claims printer my-printer is the default printer
Assert $::thisNode claims paper format a4 is the default paper format
Assert $::thisNode claims printer simple-printer can print single-sided letter paper
Step
Assert printProgram-[incr i] has program {{this} {
set code { Wish $this to be outlined green }
Wish to print $code with job-id [expr {rand()}] printer my-printer format a4
}}
Step
Assert printProgram-[incr i] has program {{this} {
set code { Wish $this to be outlined green }
Wish to print $code with job-id [expr {rand()}] printer my-printer
}}
Step
Assert printProgram-[incr i] has program {{this} {
set code { Wish $this to be outlined green }
Wish to print $code with job-id [expr {rand()}]
}}
Assert printProgram-[incr i] has program {{this} {
set code { Wish $this to be outlined green }
Wish to print $code with job-id front-back format letter
}}
Step
Assert printProgram-[incr i] has program {{this} {
set code { Wish $this to be outlined green }
Wish to print the back of job-id front-back
}}
Step
|
