From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 10 Feb 2020 03:38:48 +0000 (+0100)
Subject: reduce default image size
X-Git-Url: http://git.shiar.nl/minime.git/commitdiff_plain/b2b31fafeac21fe65d7e17dd15ffe5f0b224a68a?hp=f4e24a4d3bf2aee9e0169007c32c4d0277570b4e

reduce default image size

Mostly hopeless for recognisability, so prefer simplicity in diffs.
---

diff --git a/termimg b/termimg
index b7fa934..7eccb49 100755
--- a/termimg
+++ b/termimg
@@ -49,14 +49,14 @@ eval {
 open my $pgm, '-|', convert => (
 	-compress => 'none',
 	'+distort' => SRT => '0,0 1,.56 0',
-	-thumbnail => $size || '66x23',
+	-thumbnail => $size || '40x12',
 	$file => 'pgm:-'
 ) or die $!;
 
 if (<$pgm> eq "P2\n") {
 	my ($width, $height) = split ' ', <$pgm>;
 	<$pgm>;  # ignore depth
-	my @ch = split //, " .:coO@";
+	my @ch = split //, " .:oO@";
 	while (<$pgm>) {
 		print $ch[ $_ * @ch >> 8 ] for /\d+/g;
 		print ' ', shift @info if @info;