summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLUtils.pm
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2012-05-21 15:14:54 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2012-05-21 15:14:54 +0000
commit0f8efd8125256f6402f1ef747c7e8fd04e97e480 (patch)
tree64f242e66d908a4e3cd16424b60f2938c1c0fa78 /Master/tlpkg/TeXLive/TLUtils.pm
parentc741c860f5742796a652f48ad4134f7caae6a1f1 (diff)
Added release year to filetypes
git-svn-id: svn://tug.org/texlive/trunk@26541 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLUtils.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 6d385578337..fa594e14563 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1575,7 +1575,7 @@ sub _do_postaction_fileassoc {
tlwarn("filetype of fileassoc postaction not given\n");
return 0;
}
- my $filetype = $keyval{'filetype'};
+ my $filetype = $keyval{'filetype'}.'.'.$ReleaseYear;
&log("postaction $how fileassoc for " . $tlpobj->name .
": $extension, $filetype\n");
@@ -1606,7 +1606,7 @@ sub _do_postaction_filetype {
tlwarn("name of filetype postaction not given\n");
return 0;
}
- my $name = $keyval{'name'};
+ my $name = $keyval{'name'}.'.'.$ReleaseYear;
# cmd can be an arbitrary string
if (!defined($keyval{'cmd'})) {
@@ -1656,7 +1656,7 @@ sub _do_postaction_progid {
tlwarn("filetype of progid postaction not given\n");
return 0;
}
- my $filetype = $keyval{'filetype'};
+ my $filetype = $keyval{'filetype'}.'.'.$ReleaseYear;
&log("postaction $how progid for " . $tlpobj->name .
": $extension, $filetype\n");