Add support for notes field in configuration profiles. #130

This commit is contained in:
Henrik Brix Andersen 2012-02-05 20:55:17 +01:00
parent 4dd33c6b05
commit 121895d3fc
5 changed files with 28 additions and 1 deletions

View file

@ -463,6 +463,9 @@ sub export_gcode {
my @lt = localtime;
printf $fh "; generated by Slic3r $Slic3r::VERSION on %02d-%02d-%02d at %02d:%02d:%02d\n\n",
$lt[5] + 1900, $lt[4]+1, $lt[3], $lt[2], $lt[1], $lt[0];
print $fh "; $_\n" foreach split /\R/, $Slic3r::notes;
print $fh "\n" if $Slic3r::notes;
for (qw(layer_height perimeters solid_layers fill_density nozzle_diameter filament_diameter
perimeter_speed infill_speed travel_speed extrusion_width_ratio scale)) {