Index: openacs-4/packages/acs-templating/tcl/head-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/head-procs.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/acs-templating/tcl/head-procs.tcl	7 Jan 2008 17:49:30 -0000	1.9
+++ openacs-4/packages/acs-templating/tcl/head-procs.tcl	7 Jan 2008 19:21:10 -0000	1.10
@@ -461,10 +461,10 @@
     variable ::template::head::links
     template::multirow create link rel type href title lang media
     if {[array exists links]} {
-        # first media = "screen"
+        # first media = "all"
         foreach name [array names links] {
             foreach {rel href type media title lang} $links($name) {
-                if {$media eq "screen" && $rel ne "alternate stylesheet"} {
+                if {$media eq "all" && $rel ne "alternate stylesheet"} {
                     template::multirow append link \
                         $rel \
                         $type \
@@ -476,7 +476,7 @@
                 }
             }
         }
-        # then media != "screen"
+        # then media != "all"
         foreach name [array names links] {
             foreach {rel href type media title lang} $links($name) {
                 if {$rel ne "alternate stylesheet" && $links($name) ne ""} {
@@ -494,7 +494,7 @@
         # now alternate stylesheet, prioritize media = "screen"
         foreach name [array names links] {
             foreach {rel href type media title lang} $links($name) {
-                if {$media eq "screen" && $links($name) ne ""} {
+                if {$media eq "all" && $links($name) ne ""} {
                     template::multirow append link \
                         $rel \
                         $type \