miniblog

Miniblog: A command-line static blog system in Common Lisp
Log | Files | Refs | README | LICENSE

html-head.lhtml (1226B)


      1 <head>
      2   <title>
      3     <%= (or (getf env :title) "Miniblog") %>
      4     <% @if year %>
      5       - <% @var year %>/<% @var month %>
      6     <% @endif %>
      7   </title>
      8   <style>
      9     header#miniblog-header { width: 100%; }
     10     section#miniblog-left { float: left; width: 15%; }
     11     section#miniblog-main { float: left; width: <%= (if (getf env :links) "65%" "80%") %>; }
     12     nav#miniblog-nav { float: left; width: 20%; }
     13     div#miniblog-rss { clear: both; }
     14     table.calendar { padding: 10px; float: left; }
     15     table.calendar td { width: 25%; }
     16     ul.page-list { list-style: none; margin: 0; padding: 0 0 0 10px; }
     17     @media screen and (max-aspect-ratio: 1/1) {
     18       section#miniblog-left { float: none; width: 100%; }
     19       section#miniblog-main { float: none; width: 100%; }
     20       nav#miniblog-nav { float: none; width: 100%; }
     21     }
     22   </style>
     23   <meta name="viewport" content="width=device-width, initial-scale=1.0">
     24   <% @if stylesheet %>
     25     <link rel="stylesheet" type="text/css" href="<% @var stylesheet %>">
     26   <% @endif %>
     27   <% @if enable-rss %>
     28     <link rel="alternate" type="application/rss+xml"
     29       title="RSS feed for <%= (or (getf env :title) "Miniblog") %>"
     30       href="<% @var root-uri %>rss.xml">
     31   <% @endif %>
     32 </head>