Index: openacs-4/packages/acs-content-repository/acs-content-repository.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/acs-content-repository.info,v
diff -u -N -r1.117.2.16 -r1.117.2.17
--- openacs-4/packages/acs-content-repository/acs-content-repository.info	1 Apr 2022 13:57:47 -0000	1.117.2.16
+++ openacs-4/packages/acs-content-repository/acs-content-repository.info	3 Nov 2022 13:50:08 -0000	1.117.2.17
@@ -7,7 +7,7 @@
     <initial-install-p>t</initial-install-p>
     <singleton-p>t</singleton-p>
 
-    <version name="5.10.1d4" url="http://openacs.org/repository/download/apm/acs-content-repository-5.10.1d4.apm">
+    <version name="5.10.1d5" url="http://openacs.org/repository/download/apm/acs-content-repository-5.10.1d5.apm">
     <implements-subsite-p>f</implements-subsite-p>
     <inherit-templates-p>t</inherit-templates-p>
         <owner url="http://openacs.org">OpenACS</owner>
@@ -24,7 +24,7 @@
         <license>GPL</license>
         <maturity>3</maturity>
 
-        <provides url="acs-content-repository" version="5.10.1d4"/>
+        <provides url="acs-content-repository" version="5.10.1d5"/>
         <requires url="acs-kernel" version="5.10.0"/>
         <requires url="acs-service-contract" version="5.10.0"/>
         <requires url="acs-tcl" version="5.10.1d13"/>
Index: openacs-4/packages/acs-content-repository/sql/common/mime-type-data.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/common/mime-type-data.sql,v
diff -u -N -r1.12.2.2 -r1.12.2.3
--- openacs-4/packages/acs-content-repository/sql/common/mime-type-data.sql	28 Apr 2020 13:32:12 -0000	1.12.2.2
+++ openacs-4/packages/acs-content-repository/sql/common/mime-type-data.sql	3 Nov 2022 13:50:08 -0000	1.12.2.3
@@ -572,8 +572,9 @@
 insert into cr_mime_types(label, mime_type, file_extension) select 'Microsoft Office PowerPoint Template macro enabled', 'application/vnd.ms-powerpoint.template.macroenabled.12', 'potm' from dual;
 insert into cr_mime_types(label, mime_type, file_extension) select 'Microsoft Office PowerPoint Slideshow macro enabled', 'application/vnd.ms-powerpoint.slideshow.macroenabled.12', 'ppsm' from dual;
 
+-- Video subtitles
+insert into cr_mime_types (label,mime_type,file_extension) values ( 'Web Video Text Tracks Format', 'text/vtt', 'vtt' );
 
-
 --  Here are some less common mime types and extensions not defined here.
 --
 --  tsp       | application/dsptype
Index: openacs-4/packages/acs-content-repository/sql/oracle/upgrade/upgrade-5.10.1d4-5.10.1d5.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/oracle/upgrade/Attic/upgrade-5.10.1d4-5.10.1d5.sql,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-content-repository/sql/oracle/upgrade/upgrade-5.10.1d4-5.10.1d5.sql	3 Nov 2022 13:50:08 -0000	1.1.2.1
@@ -0,0 +1,45 @@
+--
+-- Update mime types.
+-- The changes have to be performed in a transaction, therefore the inline function.
+--
+
+create or replace function inline_0 (
+    p_label in varchar,
+    p_extension in varchar,
+    p_old_mime_type in varchar,
+    p_new_mime_type in varchar
+)
+return integer
+as
+begin
+  v_extension_exists integer default 0;
+
+  delete from cr_extension_mime_type_map where mime_type = p_old_mime_type;
+
+  insert into cr_mime_types(label, mime_type, file_extension)
+    select p_label, p_new_mime_type, p_extension from dual
+    where not exists (select 1 from cr_mime_types where mime_type = p_new_mime_type);
+
+  update cr_content_mime_type_map   set mime_type = p_new_mime_type where mime_type = p_old_mime_type;
+  update cr_revisions               set mime_type = p_new_mime_type where mime_type = p_old_mime_type;
+
+  select 1 into v_extension_exists 
+    from cr_extension_mime_type_map 
+    where extension = p_extension;
+
+  if v_extension_exists = 1 then
+    update cr_extension_mime_type_map set mime_type = p_new_mime_type where extension = p_extension;
+  else
+    insert into cr_extension_mime_type_map (extension, mime_type)
+      select p_extension, p_new_mime_type from dual
+      where not exists (select 1 from cr_extension_mime_type_map where mime_type = p_new_mime_type);
+  end if;
+
+  delete from cr_mime_types where mime_type = p_old_mime_type;
+  return 1;
+end;
+/
+
+select inline_0('Web Video Text Tracks Format', 'vtt','' ,'text/vtt') from dual;
+
+drop function inline_0;
Index: openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/upgrade-5.10.1d4-5.10.1d5.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/Attic/upgrade-5.10.1d4-5.10.1d5.sql,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/upgrade-5.10.1d4-5.10.1d5.sql	3 Nov 2022 13:50:08 -0000	1.1.2.1
@@ -0,0 +1,38 @@
+--
+-- Update mime types.
+-- The changes have to be performed in a transaction, therefore the inline function.
+--
+create or replace function inline_0 (
+    p_label varchar,
+    p_extension varchar,
+    p_old_mime_type varchar,
+    p_new_mime_type varchar
+)
+returns integer as $$
+begin
+    SET CONSTRAINTS ALL DEFERRED;
+    delete from cr_extension_mime_type_map where mime_type = p_old_mime_type;
+
+    insert into cr_mime_types(label, mime_type, file_extension)
+        select p_label, p_new_mime_type, p_extension from dual
+        where not exists (select 1 from cr_mime_types where mime_type = p_new_mime_type);
+
+    update cr_content_mime_type_map   set mime_type = p_new_mime_type where mime_type = p_old_mime_type;
+    update cr_revisions               set mime_type = p_new_mime_type where mime_type = p_old_mime_type;
+
+    if exists (select 1 from cr_extension_mime_type_map where extension = p_extension) then
+        update cr_extension_mime_type_map set mime_type = p_new_mime_type where extension = p_extension;
+    else
+        insert into cr_extension_mime_type_map (extension, mime_type)
+            select p_extension, p_new_mime_type from dual
+            where not exists (select 1 from cr_extension_mime_type_map where mime_type = p_new_mime_type);
+    end if;
+
+    delete from cr_mime_types where mime_type = p_old_mime_type;
+    return 0;
+end;
+$$ language 'plpgsql';
+
+select inline_0('Web Video Text Tracks Format', 'vtt','' ,'text/vtt');
+
+drop function inline_0(varchar,varchar,varchar,varchar);