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

Enlarge the Output filename format field

Browse Source
This commit is contained in:
Alessandro Ranellucci
2012-06-18 10:28:53 +02:00
parent a59b82db06
commit 19a78de82f
2 changed files with 3 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/Slic3r/Config.pm
View File

@@ -33,6 +33,7 @@ our $Options = {
label => 'Output filename format', label => 'Output filename format',
cli => 'output-filename-format=s', cli => 'output-filename-format=s',
type => 's', type => 's',
width => 300,
}, },
# printer options # printer options

8
lib/Slic3r/GUI/OptionsGroup.pm
View File

@@ -42,12 +42,8 @@ sub new {
my $field; my $field;
if ($opt->{type} =~ /^(i|f|s|s@)$/) { if ($opt->{type} =~ /^(i|f|s|s@)$/) {
my $style = 0; my $style = 0;
my $size = Wx::wxDefaultSize; $style = &Wx::wxTE_MULTILINE if $opt->{multiline};
my $size = Wx::Size->new($opt->{width} || -1, $opt->{height} || -1);
if ($opt->{multiline}) {
$style = &Wx::wxTE_MULTILINE;
$size = Wx::Size->new($opt->{width} || -1, $opt->{height} || -1);
}
my ($get, $set) = $opt->{type} eq 's@' ? qw(serialize deserialize) : qw(get set); my ($get, $set) = $opt->{type} eq 's@' ? qw(serialize deserialize) : qw(get set);