1 files changed, 75 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/latex-web-companion/ch7/invtab2.dsl b/Master/texmf-dist/doc/latex/latex-web-companion/ch7/invtab2.dsl
new file mode 100644
index 00000000000..eac8c01392e
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/latex-web-companion/ch7/invtab2.dsl
@@ -0,0 +1,75 @@
+<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style-Sheet//EN">
+<style-sheet>
+<style-specification>
+<style-specification-body>
+(define FontSize 12pt)
+(root
+  (make simple-page-sequence
+    left-margin:  1cm
+    page-width:   10cm
+    right-margin: 1cm
+    (make scroll
+      font-size: FontSize
+      (process-children))))
+(element invitation
+  (make sequence
+    (make paragraph
+      quadding:    'center
+      space-before:   20pt
+      font-weight: 'bold
+      font-size:   24pt
+      (literal "INVITATION")) 
+    (make table
+      table-border:   #f  ; no border
+      display-alignment: 'start
+      space-before:   20pt
+      (make table-part
+        (make table-column width: 25mm)
+        (make table-column width: 10cm)
+        (make table-row
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal "When:")))
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal (attribute-string "date")))))
+        (make table-row
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal "To:")))
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal (attribute-string "to")))))
+        (make table-row
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal "Venue:")))
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal (attribute-string "where")))))
+        (make table-row
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal "Occasion:")))
+          (make table-cell
+            (make paragraph quadding: 'start
+              (literal (attribute-string "why")))))))
+    (process-children)
+    (make paragraph
+      quadding: 'end
+      space-before: FontSize
+      (literal "From: "
+        (attribute-string "signature")))))
+(element par
+  (make paragraph
+    quadding: 'justify
+    font-size: FontSize
+    space-before: FontSize
+    (process-children-trim)))
+(element emph
+  (make sequence
+    font-posture: 'italic
+    (process-children-trim)))
+</style-specification-body>
+</style-specification>
+</style-sheet>