1 files changed, 27 insertions, 0 deletions
diff --git a/Master/tlpkg/archive/applied.include-schemes.patch b/Master/tlpkg/archive/applied.include-schemes.patch
new file mode 100644
index 00000000000..d7799a3836e
--- /dev/null
+++ b/Master/tlpkg/archive/applied.include-schemes.patch
@@ -0,0 +1,27 @@
+Index: install-tl
+===================================================================
+--- install-tl	(revision 10152)
++++ install-tl	(working copy)
+@@ -490,6 +490,22 @@
+     &$h();
+   }
+   do_postinst_stuff();
++  # now we save every scheme that is fully covered by the stuff we have
++  # installed to the $localtlpdb
++  foreach my $s ($tlpdb->schemes) {
++    my $stlp = $tlpdb->get_package($s);
++    die ("That cannot happen, $s not defined in tlpdb") unless defined($stlp);
++    my $incit = 1;
++    foreach my $d ($stlp->depends) {
++      if (!defined($localtlpdb->get_package($d))) {
++        $incit = 0;
++        last;
++      }
++    }
++    if ($incit) {
++      $localtlpdb->add_tlpobj($stlp);
++    }
++  }
+   $localtlpdb->save unless $vars{'from_dvd'};
+   foreach $h (@::end_install_hook) {
+     &$h();