X-Git-Url: https://jxself.org/git/?p=srt2vtt.git;a=blobdiff_plain;f=srt2vtt;fp=srt2vtt;h=cbb4c6d5e7474c904f96a0b47c50bedb89aff958;hp=2c0e82678464eaec1def2b187a90fcbf34865282;hb=75fec5d8e5b57c75274ce82c053358c325fcb283;hpb=4482f8778584d0ca008ba02bb95794077141f155

diff --git a/srt2vtt b/srt2vtt
index 2c0e826..cbb4c6d 100755
--- a/srt2vtt
+++ b/srt2vtt
@@ -89,7 +89,7 @@
      (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)