From 42684ea2841442dfa93e28bb0f217cc230f6ec07 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 13 Nov 2022 01:44:16 +0100
Subject: [PATCH] random palette of 215 colours

Distinguish a limited number of values without regard for order.
---
 barcat | 1 +
 1 file changed, 1 insertion(+)

diff --git a/barcat b/barcat
index 54141ee..28e09b0 100755
--- a/barcat
+++ b/barcat
@@ -64,6 +64,7 @@ GetOptions(\%opt,
 			)],
 			whites => [qw( 1;30 0;37 1;37 )],
 			greys  => [map {"38;5;$_"} 0, 232..255, 15],
+			random => [map {"38;5;$_"} List::Util::shuffle(17..231)],
 			rainbow=> [map {"38;5;$_"}
 				196, # r
 				(map { 196 + $_*6   } 0..4), # +g
-- 
2.30.0