From 35b76997b41ed7a240cc0bf03daa8d2ab8a1e4cc Mon Sep 17 00:00:00 2001
From: Jean Connelly <jconnelly@cfa.harvard.edu>
Date: Wed, 15 Jul 2020 13:39:46 -0400
Subject: [PATCH] Cut some comments and old code checking for SunOS

---
 starcheck/src/starcheck.pl | 12 ------------
 1 file changed, 12 deletions(-)

diff --git a/starcheck/src/starcheck.pl b/starcheck/src/starcheck.pl
index d935ad3c..4af6740c 100755
--- a/starcheck/src/starcheck.pl
+++ b/starcheck/src/starcheck.pl
@@ -23,10 +23,6 @@
 
 use PoorTextFormat;
 
-#use lib '/proj/axaf/simul/lib/perl';
-#use GrabEnv qw( grabenv );
-#use Shell::GetEnv;
-
 use Ska::Starcheck::Obsid;
 use Ska::Parse_CM_File;
 use Carp;
@@ -62,10 +58,6 @@
 
 my $version = starcheck_version();
 
-# cheat to get the OS (major)
-my $OS = `uname`;
-chomp($OS);
-
 
 # Set some global vars with directory locations
 my $SKA = $ENV{SKA} || '/proj/sot/ska';
@@ -245,10 +237,6 @@
 my ($fid_time_violation, $error, $fidsel) = Ska::Parse_CM_File::fidsel($fidsel_file, \@bs) ;
 map { warning("$_\n") } @{$error};
 
-## Warn if we are on Solaris
-if ($OS eq 'SunOS'){
-    warning("uname == SunOS; starcheck is only approved on Linux \n");
-}
 
 # Now that global_warn exists, if the DOT wasn't made/modified by SAUSAGE
 # throw an error