From 86b2a8616989d98bf2a1b35156bece2e160394d2 Mon Sep 17 00:00:00 2001
From: Nicolas George <george@nsup.org>
Date: Tue, 31 Aug 2021 14:10:07 +0200
Subject: [PATCH] tools/dvd2concat: include language metadata

---
 tools/dvd2concat | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tools/dvd2concat b/tools/dvd2concat
index ef04a87d05..474b474191 100755
--- a/tools/dvd2concat
+++ b/tools/dvd2concat
@@ -88,9 +88,11 @@ my $concat = "ffconcat version 1.0\n";
 $concat .= "\nstream\nexact_stream_id 0x1E0\n";
 for my $audio (@{$track->{audio}}) {
   $concat .= "\nstream\nexact_stream_id " . $audio->{streamid} . "\n";
+  $concat .= "stream_meta language " . $audio->{langcode} . "\n" if $audio->{langcode};
 }
 for my $subp (@{$track->{subp}}) {
   $concat .= "\nstream\nexact_stream_id " . $subp->{streamid} . "\n";
+  $concat .= "stream_meta language " . $subp->{langcode} . "\n" if $subp->{langcode};
 }
 for my $cell (@{$track->{cell}}) {
   my $off = $cell->{first_sector};