summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/TeXLive
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-04-11 03:01:03 +0000
committerNorbert Preining <norbert@preining.info>2021-04-11 03:01:03 +0000
commit9b552e1a4637af098a01847c97658f65bc505356 (patch)
tree5fdca147f23bfe92704e86bbcac8e13521185c6c /systems/texlive/tlnet/tlpkg/TeXLive
parent5960076e4c9c15e2a052cf015dd697a65db3150d (diff)
CTAN sync 202104110301
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/TeXLive')
-rw-r--r--systems/texlive/tlnet/tlpkg/TeXLive/TLWinGoo.pm11
1 files changed, 2 insertions, 9 deletions
diff --git a/systems/texlive/tlnet/tlpkg/TeXLive/TLWinGoo.pm b/systems/texlive/tlnet/tlpkg/TeXLive/TLWinGoo.pm
index 38b23d34b4..1fa5acf76f 100644
--- a/systems/texlive/tlnet/tlpkg/TeXLive/TLWinGoo.pm
+++ b/systems/texlive/tlnet/tlpkg/TeXLive/TLWinGoo.pm
@@ -1,4 +1,4 @@
-# $Id: TLWinGoo.pm 58768 2021-04-06 10:39:46Z siepo $
+# $Id: TLWinGoo.pm 58811 2021-04-10 08:09:15Z siepo $
# TeXLive::TLWinGoo.pm - Windows goop.
# Copyright 2008-2018 Siep Kroonenberg, Norbert Preining
# This file is licensed under the GNU General Public License version 2
@@ -11,7 +11,7 @@
package TeXLive::TLWinGoo;
-my $svnrev = '$Revision: 58768 $';
+my $svnrev = '$Revision: 58811 $';
my $_modulerevision;
if ($svnrev =~ m/: ([0-9]+) /) {
$_modulerevision = $1;
@@ -89,8 +89,6 @@ BEGIN {
use vars qw( @ISA @EXPORT $Registry);
@ISA = qw( Exporter );
@EXPORT = qw(
- &is_vista
- &is_seven
&is_ten
&admin
&non_admin
@@ -1337,11 +1335,6 @@ sub maybe_make_ro {
log "Not an admin install; not making read-only\n";
return 1;
}
- if (!is_vista()) {
- log "Windows version $windows_version earlier than Vista;".
- " not making read-only\n";
- return 1;
- }
$dir = Cwd::abs_path($dir);