23 |
BEGIN GUILE |
BEGIN GUILE |
24 |
guile-output = TESTDIR/etc/anubis.out |
guile-output = TESTDIR/etc/anubis.out |
25 |
guile-debug = yes |
guile-debug = yes |
26 |
guile-load-path-append = TESTDIR/../examples |
guile-load-path-append = TOP_SRCDIR/examples |
27 |
guile-load-path-append = TESTDIR/../guile |
guile-load-path-append = TOP_SRCDIR/guile |
28 |
guile-load-program = rot-13.scm |
guile-load-program = rot-13.scm |
|
guile-load-program = anubis.scm |
|
29 |
guile-load-program = remailer.scm |
guile-load-program = remailer.scm |
30 |
END |
END |
31 |
|
|
35 |
guile-process remailer-I #:rrt gray@localhost \ |
guile-process remailer-I #:rrt gray@localhost \ |
36 |
#:post \1 \ |
#:post \1 \ |
37 |
#:latent \2 \ |
#:latent \2 \ |
38 |
#:header <<-EOT |
#:header "X-Processed-By: GNU Anubis & Remailer-I" |
39 |
In /users3 did Kubla Kahn |
done |
40 |
A stately pleasure dome decree, |
|
41 |
Where /bin, the sacred river ran |
rule "rot-13.*body" |
42 |
Through Test Suites measureless to Man |
guile-process rot-13 #:body |
43 |
Down to a sunless C. |
done |
44 |
EOT |
|
45 |
|
rule "rot-13.*subj" |
46 |
|
guile-process rot-13 #:subject |
47 |
done |
done |
48 |
|
|
49 |
---END--- |
---END--- |