From 4437b0c6745a856b7312243ca9044e02532aa388 Mon Sep 17 00:00:00 2001 From: LemonBoy Date: Mon, 30 Sep 2013 16:03:36 +0000 Subject: [PATCH] Fix issue #22 --- palette.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/palette.pl b/palette.pl index ca8c443..3a82fca 100755 --- a/palette.pl +++ b/palette.pl @@ -24,7 +24,7 @@ while () { elsif ($_ =~ m/^\s*\w*\*(background|foreground|color\d)\s*:\s*([\w\d#]+)/) { my ($name, $value) = (uc $1, $2); # Check if it's a color - if (substr($value, 1) eq '#') { + if (substr($value, 0, 1) eq '#') { $value = hex(substr($value, 1)); } else { $value = $vars{"$value"};