From 161dcf8a3d450e9ec5dfa653baebc75b2b58293f Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Fri, 5 Aug 2011 21:12:31 +0000
Subject: Not using FQDNs if hostname is printed

---
 loadbars.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/loadbars.pl b/loadbars.pl
index 1c22b71..b428f1c 100755
--- a/loadbars.pl
+++ b/loadbars.pl
@@ -403,7 +403,9 @@ sub thr_display_stats () {
 				my ($y, $space) = (5, 15);
 
 				if ($displaytxt{host}) {
-					$app->print($x, $y, sprintf '%s:', $host);
+					$host =~ /(.*)\.?/;
+					$app->print($x, $y, sprintf '%s:', $1);
+
 				} else {
 					$app->print($x, $y, sprintf  '%i:', $counter);
 				}
-- 
cgit v1.2.3