juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-20 11:53:48 +00:00
Code Issues Packages Projects Releases Wiki Activity

Update the [timestamp] placeholder(s) at every G-code export. #1957

Browse Source
This commit is contained in:
Alessandro Ranellucci
2014-04-25 19:47:13 +02:00
parent f7ffc48397
commit 6780e930cb
2 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/Slic3r/GCode/PlaceholderParser.pm
View File

@@ -12,7 +12,13 @@ sub BUILD {
# environment variables # environment variables
$s->{$_} = $ENV{$_} for grep /^SLIC3R_/, keys %ENV; $s->{$_} = $ENV{$_} for grep /^SLIC3R_/, keys %ENV;
# timestamp $self->update_timestamp;
}
sub update_timestamp {
my ($self) = @_;
my $s = $self->_single;
my @lt = localtime; $lt[5] += 1900; $lt[4] += 1; my @lt = localtime; $lt[5] += 1900; $lt[4] += 1;
$s->{timestamp} = sprintf '%04d%02d%02d-%02d%02d%02d', @lt[5,4,3,2,1,0]; $s->{timestamp} = sprintf '%04d%02d%02d-%02d%02d%02d', @lt[5,4,3,2,1,0];
$s->{year} = $lt[5]; $s->{year} = $lt[5];

2
lib/Slic3r/Print.pm
View File

@@ -839,7 +839,7 @@ sub write_gcode {
} }
# prepare the helper object for replacing placeholders in custom G-code and output filename # prepare the helper object for replacing placeholders in custom G-code and output filename
$self->placeholder_parser->update_timestamp;
# set up our helper object # set up our helper object
my $gcodegen = Slic3r::GCode->new( my $gcodegen = Slic3r::GCode->new(