From 2e68cd95dc53da7961d07981c41d02ea8bc4bd52 Mon Sep 17 00:00:00 2001
From: Ole Tange <ole@tange.dk>
Date: Sun, 5 Apr 2015 03:57:16 +0200
Subject: [PATCH] parallel: Use `stty -a </dev/tty`  if `resize` does not work
 to find $COLUMNS of terminal.

---
 src/parallel | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/parallel b/src/parallel
index f6a6d006..bb159a7d 100755
--- a/src/parallel
+++ b/src/parallel
@@ -2268,6 +2268,10 @@ sub progress {
 		my $resize = qx{ sh -c 'resize 2>/dev/null' };
 		$resize =~ /COLUMNS=(\d+);/ and do { $columns = $1; };
 	    }
+	    if(not $columns) {
+		my $stty = qx{ stty -a </dev/tty };
+		$stty =~ /(\d+) columns/ and do { $columns = $1; }
+	    }
 	    $columns ||= 80;
 	}
 	return $columns;