add media target for css file

totoro
1 parent a8f2e530
Showing 1 changed file with 2 additions and 1 deletions Show diff stats
web/CXM_making_a_web_site.anubis
@@ -4578,7 +4578,8 @@ define Printable_tree
                 script(type, _) then ["<script type=\"" + type + "\">"+content(jsi)+"</script>\n" . _format_html_head(t, so_far)],
             }
           css(cssf)         then
-            ["<link rel=\"stylesheet\" type=\"text/css\" href=\""+file_name(cssf)+"\" />\n" . _format_html_head(t, so_far)],
+            since cssf is css_file(file_name, media),          
+            ["<link rel=\"stylesheet\" type=\"text/css\" href=\""+file_name+"\" media=\""+to_String(media)+"\" />\n" . _format_html_head(t, so_far)],
           css_inline(cssi)  then
             ["<style>"+cssi+"</style>\n" . _format_html_head(t, so_far)]
         }