css pragma

[shellwiki] / themes / default.sh

diff --git a/themes/default.sh b/themes/default.sh
index 0b850078a06c321a6892813b1d129b8b1fabd9af..f9dfe4189963c55bcb283c1d78ae74f1d4f7d12c 100755 (executable)
--- a/themes/default.sh
+++ b/themes/default.sh
@@ -3,11 +3,14 @@
 . "$_EXEC/tools.sh"
 
 theme_head(){
+  local IFS="$BR"
   printf '
   <meta name="viewport" content="width=device-width"/>
-  <link rel="stylesheet" type="text/css" href="%s/[.]/cgilite/common.css">
-  <link rel="stylesheet" type="text/css" href="%s/[.]/themes/default.css">
-  ' "$_BASE"
+  '
+  for css in "$_BASE/[.]/cgilite/common.css" "$_BASE/[.]/themes/default.css" $PAGE_CSS; do
+    printf  '<link rel="stylesheet" type="text/css" href="%s">' \
+            "$(HTML "${css#/}")"
+  done
 }
 
 theme_header(){