diff options
author | Y. Sapir <yasapir@gmail.com> | 2014-05-15 02:42:30 +0400 |
---|---|---|
committer | Y. Sapir <yasapir@gmail.com> | 2014-06-13 15:02:09 +0400 |
commit | 09357e58683142b04d2529f536ad36eb96d86428 (patch) | |
tree | e48e8544099fd30f3cf6df8db3d96838643dd96f /t/custom_gcode.t | |
parent | 97231327e0da0de81186763e03b6eab02594f662 (diff) |
A few improvements to gcode placeholder tests.
Diffstat (limited to 't/custom_gcode.t')
-rw-r--r-- | t/custom_gcode.t | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/t/custom_gcode.t b/t/custom_gcode.t index c693aecb9..6423c394d 100644 --- a/t/custom_gcode.t +++ b/t/custom_gcode.t @@ -53,16 +53,16 @@ use Slic3r::Test; { my $config = Slic3r::Config->new_from_defaults; - $config->set('output_filename_format', '[travel_speed]_[layer_height].gcode'); + $config->set('output_filename_format', 'ts_[travel_speed]_lh_[layer_height].gcode'); $config->set('start_gcode', "TRAVEL:[travel_speed] HEIGHT:[layer_height]\n"); my $print = Slic3r::Test::init_print('20mm_cube', config => $config); my $output_file = $print->print->expanded_output_filepath; - ok $output_file !~ /\[travel_speed\]/, 'print config options are replaced in output filename'; - ok $output_file !~ /\[layer_height\]/, 'region config options are replaced in output filename'; + my ($t, $h) = map $config->$_, qw(travel_speed layer_height); + ok $output_file =~ /ts_${t}_/, 'print config options are replaced in output filename'; + ok $output_file =~ /lh_$h\./, 'region config options are replaced in output filename'; my $gcode = Slic3r::Test::gcode($print); - my ($t, $h) = map $config->$_, qw(travel_speed layer_height); ok $gcode =~ /TRAVEL:$t/, 'print config options are replaced in custom G-code'; ok $gcode =~ /HEIGHT:$h/, 'region config options are replaced in custom G-code'; } @@ -100,7 +100,7 @@ use Slic3r::Test; # being embedded in the G-code ok $gcode =~ /temp0:200/, 'temperature placeholder for first extruder correctly populated'; ok $gcode =~ /temp1:205/, 'temperature placeholder for second extruder correctly populated'; - ok $gcode =~ /temp2:200/, 'tempearture placeholder for unused extruder populated with first value'; + ok $gcode =~ /temp2:200/, 'temperature placeholder for unused extruder populated with first value'; } } |