From ca61adaa797adbb82380cc8b3788243b597564d4 Mon Sep 17 00:00:00 2001
From: EuAndreh <eu@euandre.org>
Date: Mon, 10 Oct 2022 18:46:30 -0300
Subject: bin/status-bar: Include count of up VMs

---
 bin/status-bar | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/bin/status-bar b/bin/status-bar
index 65cef1c..31f9bd2 100755
--- a/bin/status-bar
+++ b/bin/status-bar
@@ -89,8 +89,14 @@ while (my ($statusline) = (<STDIN> =~ /^,?(.*)/)) {
 	my $mpris = `player current`;
 	chomp $mpris;
 
+	my $vms = `vm status | grep :up\$ | wc -l`;
+	chomp $vms;
+
 	@blocks = ({
-		full_text => "$mpris",
+		full_text => $vms,
+		name => 'vms',
+	}, {
+		full_text => $mpris,
 		name => 'mpris',
 	}, @blocks);
 
-- 
cgit v1.2.3