doc/build-html.el

   1 #! /usr/bin/emacs --script
   2
   3 ;;;; Make html files from .muse files in current dir, put them into ../html/
   4
   5 (color-theme-whateveryouwant)
   6 (require 'muse-mode)
   7 (require 'muse-html)
   8 (require 'muse-project)
   9 (setq muse-html-table-attributes " class=\"muse-table\" border=\"1\" cellpadding=\"5\"")
  10 (setq muse-colors-inline-image-method  #'muse-colors-use-publishing-directory)
  11 (muse-derive-style "xhtml-plainandsimple" "xhtml1.1"
  12                    :header "<?xml version=\"1.0\" encoding=\"<lisp>
  13   (muse-html-encoding)</lisp>\"?>
  14 <!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.1//EN\" \"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd\">
  15 <html xmlns=\"http://www.w3.org/1999/xhtml\">
  16   <head>
  17     <title><lisp>(muse-publishing-directive \"title\")</lisp></title>
  18     <meta name=\"DC.Title\" content=\"<lisp>(muse-publishing-directive \"title\")</lisp>\" />
  19     <meta name=\"DC.Creator\" content=\"<lisp>(muse-publishing-directive \"author\")</lisp>\" />
  20     <meta name=\"author\" content=\"<lisp>(muse-publishing-directive \"author\")</lisp>\" />
  21     <meta name=\"generator\" content=\"muse.el\" />
  22     <meta http-equiv=\"<lisp>muse-html-meta-http-equiv</lisp>\" content=\"<lisp>muse-html-meta-content-type</lisp>\" />
  23     <lisp>
  24       (let ((maintainer (muse-style-element :maintainer)))
  25         (when maintainer
  26           (concat \"<link rev=\\\"made\\\" href=\\\"\" maintainer \"\\\" />\")))
  27     </lisp><lisp>
  28      (muse-style-element :style-sheet muse-publishing-current-style)
  29     </lisp>
  30   </head>
  31   <body>
  32     <div id=\"header\">
  33       <h1><lisp>(muse-publishing-directive \"title\")</lisp></h1>
  34       <h2><lisp>(muse-publishing-directive \"subtitle\")</lisp></h2>
  35     </div><!-- end header -->
  36     <div id=\"sidebar\">
  37      <lisp>(muse-publishing-directive \"sidebar\")</lisp>
  38       <markup><include file=\"sidebar.muse\"></markup>
  39     </div><!-- end sidebar -->
  40     <div id=\"content\">
  41 <!-- Page published by Emacs Muse begins here -->
  42 "
  43                    :footer "<!-- Page published by Emacs Muse ends here -->
  44     </div><!-- end content -->
  45     <div id=\"footer\">
  46       <div id=\"footer-right\">
  47         <markup><include file=\"footer-right.muse\"></markup>
  48       </div>
  49       <markup><include file=\"footer.muse\"></markup>
  50     </div><!-- end footer -->
  51   </body>
  52 </html>"
  53                    :style-sheet "<style type=\"text/css\">
  54     /** Style sheet derived from PLAINANDSIMPLE, a free template from         */
  55     /** http://www.freecsstemplates.org released under a Creative Commons     */
  56     /** Attribution 2.5 License (http://creativecommons.org/licenses/by/2.5/) */
  57  /** BASIC */
  58       body, pre, code, a {
  59         margin: 0em;
  60         padding: 0em;
  61         font-family: \"Courier New\", Courier, monospace;
  62       }
  63       pre {
  64         border-width: thin;
  65         border-style: dotted;
  66         border-color: #CCCCCC;
  67       }
  68       code {
  69         border-bottom-width: thin;
  70         border-bottom-style: dotted;
  71         border-bottom-color: #CCCCCC;
  72       }
  73       h1, h2, h3, h4, h5, h6 {
  74         margin: 0em;
  75         padding: 0em;
  76         margin-top: 1em;
  77       }
  78       div > p, div > ol, div > ul, div > pre, td, th, dl {
  79         font-size: .8em;
  80       }
  81       ul {
  82         list-style-type: circle;
  83       }
  84       table {
  85         border-collapse: collapse;
  86       }
  87       a {
  88         color: #000000;
  89       }
  90       a:hover {
  91         text-decoration: none;
  92         background-color: #000000;
  93         color: #FFFFFF;
  94       }
  95  /** HEADER */
  96       #header {
  97         margin: 0em;
  98         padding: 0em 1em;
  99         background-color: #A8A8A8;
 100       }
 101       #header h1 {
 102         margin: 0em;
 103         padding: 0em;
 104         color: #FFFFFF;
 105       }
 106       #header h2 {
 107         margin: 0em;
 108         padding: 0em;
 109         font-size: 1em;
 110         color: #FFFFFF;
 111       }
 112  /** SIDEBAR */
 113       #sidebar {
 114         float: left;
 115         width: 15%;
 116         margin: 1em 0em 0em 0em;
 117         padding: 1em;
 118       }
 119       #sidebar > ul {
 120         margin: 0em;
 121         padding: 0em;
 122         list-style: none;
 123         text-align: center;
 124         font-weight: bold;
 125       }
 126       #sidebar * ul {
 127         margin: .5em 0em 0em 0em;
 128         padding: 0em;
 129         list-style: none;
 130         font-weight: normal;
 131       }
 132       #sidebar > ul > li {
 133         padding: 1em 0em;
 134       }
 135       #sidebar > ul > li li {
 136         padding: .3em 0em;
 137       }
 138  /** CONTENT */
 139       #content {
 140         float: left;
 141         width: 70%;
 142       }
 143  /** FOOTER */
 144       #footer {
 145         clear: both;
 146         padding: 0px 1em 1px 1em;
 147         font-weight: bold;
 148         color: #FFFFFF;
 149         background-color: #A8A8A8;
 150       }
 151       #footer-right {
 152         float: right;
 153         font-weight: normal;
 154       }
 155       #footer p {
 156         margin: 0em;
 157         padding: 0em;
 158       }
 159       #footer a {
 160         color: #FFFFFF;
 161       }
 162     </style>")
 163
 164 (setq muse-project-alist
 165       '(("Monikop and Pokinom"
 166          ("." :default "index")
 167          (:base
 168           "xhtml-plainandsimple"
 169           :path "../html"
 170           :exclude "\\(footer.muse\\)\\|\\(footer-right.muse\\)\\|\\(sidebar.muse\\)"))))
 171
 172 (muse-project-publish "Monikop and Pokinom" t)