From f1cfe4856b67f112d6b159ad0c7c471c58707ef2 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 13 Nov 2011 14:38:42 +0100
Subject: Fakedisplay.pm: Make 0..9 digits monospace

---
 lib/App/VRR/Fakedisplay.pm.PL | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/lib/App/VRR/Fakedisplay.pm.PL b/lib/App/VRR/Fakedisplay.pm.PL
index 26e1434..1a9bf49 100644
--- a/lib/App/VRR/Fakedisplay.pm.PL
+++ b/lib/App/VRR/Fakedisplay.pm.PL
@@ -20,6 +20,10 @@ sub write_out {
 	say $out_fh "'${char}' => {";
 	say $out_fh 'matrix => [';
 
+	if ($char eq '1') {
+		$off_x--;
+	}
+
 	for my $pos_y ( $off_y .. ( $off_y + 10 ) ) {
 		print $out_fh '[ ';
 		for my $pos_x ( $off_x .. ( $off_x + 10 ) ) {
@@ -45,6 +49,10 @@ sub write_out {
 		$char_w = 5;
 	}
 
+	if ($char ~~ [qw[0 1 2 3 4 5 6 7 8 9]]) {
+		$char_w = 6;
+	}
+
 	say $out_fh '],';
 	say $out_fh "width => ${char_w},";
 	say $out_fh '},';
-- 
cgit v1.2.3