juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-17 18:42:24 +00:00
Code Issues Packages Projects Releases Wiki Activity

Enable/disable duplication controls

Browse Source
This commit is contained in:
Alessandro Ranellucci
2012-04-11 17:38:56 +02:00
parent e58ed195fd
commit e5abb0b9df
4 changed files with 30 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lib/Slic3r/Config.pm
View File

@@ -395,6 +395,13 @@ our $Options = {
cli => 'rotate=i',
type => 'i',
},
'duplicate_mode' => {
label => 'Duplicate',
gui_only => 1,
type => 'select',
values => [qw(no autoarrange grid)],
labels => ['No', 'Autoarrange', 'Grid'],
},
'duplicate' => {
label => 'Copies (autoarrange)',
cli => 'duplicate=i',
@@ -459,6 +466,7 @@ sub save {
open my $fh, '>', $file;
binmode $fh, ':utf8';
foreach my $opt (sort keys %$Options) {
next if $Options->{$opt}{gui_only};
my $value = get($opt);
$value = $Options->{$opt}{serialize}->($value) if $Options->{$opt}{serialize};
printf $fh "%s = %s\n", $opt, $value;
@@ -624,6 +632,8 @@ sub validate {
|| (grep !$_, @$Slic3r::duplicate_grid);
die "Use either --duplicate or --duplicate-grid (using both doesn't make sense)\n"
if $Slic3r::duplicate > 1 && $Slic3r::duplicate_grid && (grep $_ && $_ > 1, @$Slic3r::duplicate_grid);
$Slic3r::duplicate_mode = 'autoarrange' if $Slic3r::duplicate > 1;
$Slic3r::duplicate_mode = 'grid' if grep $_ && $_ > 1, @$Slic3r::duplicate_grid;
# --duplicate-distance
die "Invalid value for --duplicate-distance\n"