summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2021-04-10 08:09:15 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2021-04-10 08:09:15 +0000
commit842ba82ac1597e10d8d4bcd98550ce081a5bf58a (patch)
tree575a004abde8674be125e5694f396c836e4e82c9
parent7399ea5e217d14ad9807ff7397eacbdba6b52dc7 (diff)
References to is_vista and is_seven removed
git-svn-id: svn://tug.org/texlive/trunk@58811 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/install-tl2
-rw-r--r--Master/tlpkg/TeXLive/TLWinGoo.pm7
2 files changed, 0 insertions, 9 deletions
diff --git a/Master/install-tl b/Master/install-tl
index c7aac16ac78..be073cb1192 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -181,8 +181,6 @@ binmode (STDERR, ':encoding(console_out)');
if (win32) {
require TeXLive::TLWinGoo;
TeXLive::TLWinGoo->import( qw(
- &is_vista
- &is_seven
&admin
&non_admin
&reg_country
diff --git a/Master/tlpkg/TeXLive/TLWinGoo.pm b/Master/tlpkg/TeXLive/TLWinGoo.pm
index 7f07c647025..796c87b44a1 100644
--- a/Master/tlpkg/TeXLive/TLWinGoo.pm
+++ b/Master/tlpkg/TeXLive/TLWinGoo.pm
@@ -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);