Index: openacs-4/packages/s5/tcl/s5-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/s5/tcl/s5-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/s5/tcl/s5-procs.tcl	28 Jan 2008 13:01:00 -0000	1.6
+++ openacs-4/packages/s5/tcl/s5-procs.tcl	29 Jan 2008 12:03:35 -0000	1.7
@@ -82,14 +82,14 @@
     }
   }
 
-  s5 instproc slideshow_header {-title -creator -footer -s5dir} {
+  s5 instproc slideshow_header {-title -creator -footer -s5dir -presdate} {
     return [subst {<html xmlns="http://www.w3.org/1999/xhtml">
 <head>
 <title>$title</title>
 <!-- metadata -->
 <meta name="generator" content="xowiki S5" />
 <meta name="version" content="\$Id\$" />
-<meta name="presdate" content="20050128" />
+<meta name="presdate" content="$presdate" />
 <meta name="author" content="$creator" />
 <!-- configuration parameters -->
 <meta name="defaultView" content="slideshow" />
@@ -141,13 +141,15 @@
     my instvar package_id style page
     ::xo::cc set_parameter master 0
 
-    set output {
-
+    set coverpage [my resolve_page_name en:cover]
+    if {$coverpage eq ""} {
+      set coverpage $page
     }
 
     set output [my slideshow_header \
-                    -title [$page set title] \
-                    -creator [$page set creator] \
+                    -title [$coverpage set title] \
+                    -creator [$coverpage set creator] \
+                    -presdate [lindex [$coverpage set last_modified] 0] \
                     -footer [$page include "footer -decoration none"] \
                     -s5dir "/resources/s5/$style/ui/default"]
 
Index: openacs-4/packages/s5/www/resources/standard/ui/default/print.css
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/s5/www/resources/standard/ui/default/print.css,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/s5/www/resources/standard/ui/default/print.css	28 Jan 2008 13:01:00 -0000	1.2
+++ openacs-4/packages/s5/www/resources/standard/ui/default/print.css	29 Jan 2008 12:03:35 -0000	1.3
@@ -1,34 +1,51 @@
-/* The following rule is necessary to have all slides appear in print! DO NOT REMOVE IT! */
-.slide, ul {page-break-inside: avoid; visibility: visible !important;}
-h1 {page-break-after: avoid;}
-
-body {font-size: 14pt; background: white;}
-* {color: black;}
-
-#slide0 h1 {font-size: 200%; border: none; margin: 0.5em 0 0.25em;}
-#slide0 h3 {margin: 0; padding: 0;}
-#slide0 h4 {margin: 0 0 0.5em; padding: 0;}
-#slide0 {margin-bottom: 3em;}
-
-h1 {border-top: 2pt solid gray; 
-    border-bottom: 1px dotted silver;
-    margin-bottom: 0.7cm;
-    font-size: 140%;
-    padding-top: 10px;
-    padding-bottom: 10px;
-}
-.extra {background: transparent !important;}
-div.extra, pre.extra, .example {font-size: 10pt; color: #333;}
-ul.extra a {font-weight: bold;}
-p.example {display: none;}
-
-#header {display: none;}
-#footer h1 {margin: 0; border-bottom: 1px solid; color: gray; font-style: italic;}
-#footer h2, #controls {display: none;}
-
-/* The following rule keeps the layout stuff out of print.  Remove at your own risk! */
-.layout, .layout * {display: none !important;}
-
-div.slide {height: 11.55cm;}
-div.odd {page-break-after: always;}
-div.slide {font-size: 16px; font-family: sans-serif;}
\ No newline at end of file
+/* The following rule is necessary to have all slides appear in print! DO NOT REMOVE IT! */
+.slide, ul {page-break-inside: avoid; visibility: visible !important;}
+h1 {page-break-after: avoid;}
+
+body {font-size: 14pt; background: white;}
+* {color: black;}
+
+#slide0 h1 {font-size: 200%; border: none; margin: 0.5em 0 0.25em;}
+#slide0 h3 {margin: 0; padding: 0;}
+#slide0 h4 {margin: 0 0 0.5em; padding: 0;}
+#slide0 {margin-bottom: 3em;}
+
+h1 {border-top: 2pt solid gray; 
+    border-bottom: 1px dotted silver;
+    margin-bottom: 0.7cm;
+    font-size: 140%;
+    padding-top: 10px;
+    padding-bottom: 10px;
+}
+.extra {background: transparent !important;}
+div.extra, pre.extra, .example {font-size: 10pt; color: #333;}
+ul.extra a {font-weight: bold;}
+p.example {display: none;}
+
+#header {display: none;}
+#footer h1 {margin: 0; border-bottom: 1px solid; color: gray; font-style: italic;}
+#footer h2, #controls {display: none;}
+
+/* The following rule keeps the layout stuff out of print.  Remove at your own risk! */
+.layout, .layout * {display: none !important;}
+
+
+/* one slide per page, well suited for landcape
+   in firefox file->page setup->landscape, 
+   since @page {size: landscape;} does not work 
+*/
+div.slide {
+    height: 11.55cm; page-break-after: always; 
+    font-size: 20pt; font-family: sans-serif;
+}
+div.slide img { font-size: 14pt;}
+div.slide ul li {
+   margin-bottom: 2ex;
+   margin-top: 2ex;
+} 
+
+/* two slides per page
+div.slide {height: 11.55cm;}
+div.odd {page-break-after: always;}
+div.slide {font-size: 16px; font-family: sans-serif;}
+   */
\ No newline at end of file