texlive[58811] Master: References to is_vista and is_seven removed

[commits+siepo at tug.org]

Revision: 58811
          http://tug.org/svn/texlive?view=revision&revision=58811
Author:   siepo
Date:     2021-04-10 10:09:15 +0200 (Sat, 10 Apr 2021)
Log Message:
-----------
References to is_vista and is_seven removed

Modified Paths:
--------------
    trunk/Master/install-tl
    trunk/Master/tlpkg/TeXLive/TLWinGoo.pm

Modified: trunk/Master/install-tl
===================================================================
--- trunk/Master/install-tl	2021-04-10 07:56:28 UTC (rev 58810)
+++ trunk/Master/install-tl	2021-04-10 08:09:15 UTC (rev 58811)
@@ -181,8 +181,6 @@
 if (win32) {
   require TeXLive::TLWinGoo;
   TeXLive::TLWinGoo->import( qw(
-    &is_vista
-    &is_seven
     &admin
     &non_admin
     &reg_country

Modified: trunk/Master/tlpkg/TeXLive/TLWinGoo.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLWinGoo.pm	2021-04-10 07:56:28 UTC (rev 58810)
+++ trunk/Master/tlpkg/TeXLive/TLWinGoo.pm	2021-04-10 08:09:15 UTC (rev 58811)
@@ -89,8 +89,6 @@
   use vars qw( @ISA @EXPORT $Registry);
   @ISA = qw( Exporter );
   @EXPORT = qw(
-    &is_vista
-    &is_seven
     &is_ten
     &admin
     &non_admin
@@ -1337,11 +1335,6 @@
     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);