From 01b03277a302d93544ec11635b9a6076d2ad8d88 Mon Sep 17 00:00:00 2001
From: Sergey Matveev <stargrave@stargrave.org>
Date: Thu, 26 Dec 2024 12:34:54 +0300
Subject: [PATCH] Title support

---
 mkv/bin/my-mkvmerge | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/mkv/bin/my-mkvmerge b/mkv/bin/my-mkvmerge
index 3808ac6..8662c89 100755
--- a/mkv/bin/my-mkvmerge
+++ b/mkv/bin/my-mkvmerge
@@ -1,9 +1,13 @@
 #!/usr/bin/env zsh
 
 setopt ERR_EXIT
-zparseopts -D -A info url: descr: out:
+zparseopts -D -A info title: url: descr: out:
 tags=`mktemp`
 trap "rm -f $tags" HUP PIPE INT QUIT TERM EXIT
+[[ -z ${info[-title]} ]] || {
+    titleTag="<Tag><Simple><Name>Title</Name><String>${info[-title]}</String></Simple></Tag>"
+    tagsopt=(--global-tags $tags)
+}
 [[ -z ${info[-url]} ]] || {
     urlTag="<Tag><Simple><Name>URL</Name><String>${info[-url]}</String></Simple></Tag>"
     tagsopt=(--global-tags $tags)
@@ -13,6 +17,6 @@ trap "rm -f $tags" HUP PIPE INT QUIT TERM EXIT
     descrTag="<Tag><Simple><Name>DESCRIPTION</Name><String>$txt</String></Simple></Tag>"
     tagsopt=(--global-tags $tags)
 }
-printf "<Tags>\n%s\n%s\n</Tags>" $urlTag $descrTag >$tags
+printf "<Tags>\n%s\n%s\n</Tags>" $titleTag $urlTag $descrTag >$tags
 mkvmerge --no-date --disable-track-statistics-tags $tagsopt --output ${info[-out]} $@
 mkvpropedit --set muxing-application=- --set writing-application=- ${info[-out]}
-- 
2.48.1