From 84d15214ce76077aa74dccf8cf8d06a0bcffadfb Mon Sep 17 00:00:00 2001
From: Dave B <dave@bx.psu.edu>
Date: Fri, 5 May 2017 09:35:49 -0400
Subject: [PATCH] Call tput only if $TERM is set.

---
 KronaTools/lib/KronaTools.pm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/KronaTools/lib/KronaTools.pm b/KronaTools/lib/KronaTools.pm
index 6117474..067edb1 100644
--- a/KronaTools/lib/KronaTools.pm
+++ b/KronaTools/lib/KronaTools.pm
@@ -276,7 +276,15 @@ my $fileTaxonomy = 'taxonomy.tab';
 my $fileTaxByAcc = 'all.accession2taxid.sorted';
 my $memberLimitDataset = 10000;
 my $memberLimitTotal = 100000;
-my $columns = `tput cols`;
+my $columns;
+if (defined($ENV{TERM}))
+{
+	$columns = `tput cols`;
+}
+else
+{
+	$columns = 80;
+}
 our $minEVal = -450;