3 files changed, 4 insertions(+), 3 deletions(-)

M site/audio.html
M site/gms.scm
M site/video.html
M site/audio.html +1 -1
@@ 1,3 1,3 @@ 
 <h2>{{{TITLE}}}</h2>
-<video src="{{{M3ULINK}}}" controls=controls preload=auto></video>
+<audio src="{{{M3ULINK}}}" controls=controls preload=auto></audio><br />
 <a href="{{{FILELINK}}}">{{{FILENAME}}}</a>

          
M site/gms.scm +2 -1
@@ 42,7 42,7 @@ exec -a "$0" guile -L $(realpath $(dirna
     (while (not (eof-object? (peek-char port)))
       (set! res (cons (read-line port) res)))
     (close-pipe port)
-    (reverse (cdr res))))
+    (reverse res)))
 
 (define (read-file-as-string filename)
   (let* ((port (open-input-file filename))

          
@@ 111,6 111,7 @@ exec -a "$0" guile -L $(realpath $(dirna
   (let* ((port (open-output-file (string-append "../entries/" (assoc-ref next-video-metadata 'basename)))))
     (display next-entry port)
     (close port))
+  (sync)
   (define template (read-file-as-string "template.html"))
   (define entry-filenames (map (λ (x) (string-append "../entries/" x)) (read-all-lines "ls --sort=time ../entries/")))
   (define entries (map read-file-as-string entry-filenames))

          
M site/video.html +1 -1
@@ 1,3 1,3 @@ 
 <h2>{{{TITLE}}}</h2>
-<video src="{{{M3ULINK}}}" controls=controls preload=auto></video>
+<video src="{{{M3ULINK}}}" controls=controls preload=auto></video><br />
 <a href="{{{FILELINK}}}">{{{FILENAME}}}</a>