diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2021-04-10 08:09:15 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2021-04-10 08:09:15 +0000 |
commit | 842ba82ac1597e10d8d4bcd98550ce081a5bf58a (patch) | |
tree | 575a004abde8674be125e5694f396c836e4e82c9 | |
parent | 7399ea5e217d14ad9807ff7397eacbdba6b52dc7 (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-x | Master/install-tl | 2 | ||||
-rw-r--r-- | Master/tlpkg/TeXLive/TLWinGoo.pm | 7 |
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 ®_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); |