]> git.donarmstrong.com Git - lilypond.git/commitdiff
projects / lilypond.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 60b7a64)
* buildscripts/mutopia-index.py (headertext): add h1 header and
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Sun, 27 Mar 2005 19:18:10 +0000 (19:18 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Sun, 27 Mar 2005 19:18:10 +0000 (19:18 +0000)
utf-8 charset meta field.

* scm/framework-tex.scm (convert-to-ps): add -ofoo.ps to dvips
options.

ChangeLog patch | blob | history
buildscripts/mutopia-index.py patch | blob | history
scm/framework-tex.scm patch | blob | history

diff --git a/ChangeLog b/ChangeLog
index f8c2bd48c11b90a63c9039ca284dc31cacbb5f41..e2431d36a31aba2ad24f274fed50b713eaa59451 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2005-03-27  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
+       * buildscripts/mutopia-index.py (headertext): add h1 header and
+       utf-8 charset meta field.
+
        * input/GNUmakefile: prune example list.
 
        * scm/framework-tex.scm (convert-to-ps): add -ofoo.ps to dvips
diff --git a/buildscripts/mutopia-index.py b/buildscripts/mutopia-index.py
index f64898fbb5c6f76f04812a6a451dfaeff872e6c5..347b836a885616ebc4d840aad4e758a71033caa7 100644 (file)
--- a/buildscripts/mutopia-index.py
+++ b/buildscripts/mutopia-index.py
@@ -53,6 +53,9 @@ def file_exist_b (fn):
 
 headertext= r"""
 
+<h1>LilyPond samples</h1>
+ 
+
 <p>You're looking at a page with some LilyPond samples.  These files
 are also included in the distribution. The output is completely
 generated from the <tt>.ly</tt> source file, without any further touch
@@ -123,10 +126,12 @@ def gen_list(inputs, filename):
                list = open(filename, 'w')
        else:
                list = sys.stdout
-       list.write ('<html><head><title>Rendered Examples</title>\n')
-       list.write ('<style type="text/css">\n')
-       list.write ('hr { border:0; height:1; color: #000000; background-color: #000000; }\n')
-       list.write ('</style></head>\n')
+       list.write ('''<html><head><title>Rendered Examples</title>
+<style type="text/css">
+hr { border:0; height:1; color: #000000; background-color: #000000; }\n
+</style>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+</head>''')
 
        list.write ('<body bgcolor=white>\n')
        
diff --git a/scm/framework-tex.scm b/scm/framework-tex.scm
index af6ea94548d81c21fc096d9a2d56fef229a9abec..a4e8656c7869860bbbb65b6e84f838dba63a8587 100644 (file)
--- a/scm/framework-tex.scm
+++ b/scm/framework-tex.scm
@@ -340,7 +340,7 @@
          (format (current-error-port) (_ "Converting to `~a'...")
                  (string-append base ".dvi"))
          (newline (current-error-port))))
-    (ly:system cmd)))
+    (ly:system cmd))
 
 (define-public (convert-to-dvi book name)
   (let* ((curr-extra-mem
Debian packaging of lilypond