Fix issue #22
This commit is contained in:
parent
d87fc1f0c8
commit
4437b0c674
|
@ -24,7 +24,7 @@ while (<F>) {
|
||||||
elsif ($_ =~ m/^\s*\w*\*(background|foreground|color\d)\s*:\s*([\w\d#]+)/) {
|
elsif ($_ =~ m/^\s*\w*\*(background|foreground|color\d)\s*:\s*([\w\d#]+)/) {
|
||||||
my ($name, $value) = (uc $1, $2);
|
my ($name, $value) = (uc $1, $2);
|
||||||
# Check if it's a color
|
# Check if it's a color
|
||||||
if (substr($value, 1) eq '#') {
|
if (substr($value, 0, 1) eq '#') {
|
||||||
$value = hex(substr($value, 1));
|
$value = hex(substr($value, 1));
|
||||||
} else {
|
} else {
|
||||||
$value = $vars{"$value"};
|
$value = $vars{"$value"};
|
||||||
|
|
Loading…
Reference in New Issue
Block a user