[Debian-tex-commits] SVN tex-common commit + diffs: r1888 - tex-common/trunk/scripts

[Norbert Preining]

Author: preining-guest
Date: 2006-10-24 09:13:45 +0000 (Tue, 24 Oct 2006)
New Revision: 1888

Modified:
   tex-common/trunk/scripts/dh_installtex
Log:
uniq the list of texmf trees. yes.


Modified: tex-common/trunk/scripts/dh_installtex
===================================================================
--- tex-common/trunk/scripts/dh_installtex	2006-10-24 08:56:54 UTC (rev 1887)
+++ tex-common/trunk/scripts/dh_installtex	2006-10-24 09:13:45 UTC (rev 1888)
@@ -510,9 +510,13 @@
 		@fmtdata = @{$data{"format"}};
 	}
 	if (! $dh{NOSCRIPTS}) {
-		my @alltexmftrees = (@cmdlinetexmftrees, @defaulttexmftrees);
-		autoscript($package, "postinst", "postinst-texlsr", "s|#TEXMFTREES#|@alltexmftrees|");
-		autoscript($package, "postrm",   "postrm-texlsr", "s|#TEXMFTREES#|@alltexmftrees|");
+		my %uniq;
+		foreach (@cmdlinetexmftrees, @defaulttexmftrees) { 
+			$uniq{$_} = 1; 
+		}
+		my @foo = keys(%uniq);
+		autoscript($package, "postinst", "postinst-texlsr", "s|#TEXMFTREES#|@foo|");
+		autoscript($package, "postrm",   "postrm-texlsr", "s|#TEXMFTREES#|@foo|");
 		if ($dothefullstuff) {
 			autoscript($package, "postinst", "postinst-tex", "s/#FORMATS#/@fmtdata/; s/#WHATTODO#/@whattodo/");
 			autoscript($package, "postrm",   "postrm-tex", "s/#FORMATS#/@fmtdata/; s/#WHATTODO#/@whattodo/");