Bugfix: unable to read back config file if start or end gcode was empty. #84

This commit is contained in:
Alessandro Ranellucci 2011-12-01 22:06:07 +01:00
parent e99c9f9e5f
commit aab85a4e27

View File

@ -289,7 +289,7 @@ sub load {
open my $fh, '<', $file;
while (<$fh>) {
next if /^\s*#/;
/^(\w+) = (.+)/ or die "Unreadable configuration file (invalid data at line $.)\n";
/^(\w+) = (.*)/ or die "Unreadable configuration file (invalid data at line $.)\n";
my $key = $1;
if (!exists $Options->{$key}) {
$key = +(grep { $Options->{$_}{aliases} && grep $_ eq $key, @{$Options->{$_}{aliases}} }