Add blank line after WebVTT signature.
authorDavid Thompson <davet@gnu.org>
Thu, 8 Jan 2015 14:23:26 +0000 (09:23 -0500)
committerDavid Thompson <davet@gnu.org>
Thu, 8 Jan 2015 14:23:26 +0000 (09:23 -0500)
* srt2vtt: Add blank line between signature and first subtitle.

srt2vtt

diff --git a/srt2vtt b/srt2vtt
index 2c0e82678464eaec1def2b187a90fcbf34865282..cbb4c6d5e7474c904f96a0b47c50bedb89aff958 100755 (executable)
--- a/srt2vtt
+++ b/srt2vtt
@@ -89,7 +89,7 @@
      (newline port))))
 
 (define (write-web-vtts subtitles port)
      (newline port))))
 
 (define (write-web-vtts subtitles port)
-  (display "WEBVTT\n" port)
+  (format port "WEBVTT~%~%")
   (for-each (cut write-web-vtt <> port) subtitles))
 
 (define (convert input-port output-port)
   (for-each (cut write-web-vtt <> port) subtitles))
 
 (define (convert input-port output-port)