From 2c416cc4ac50f4bcce55b530e176966e2ba644a3 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Tue, 12 Nov 2013 17:14:37 +0100
Subject: [PATCH] Reduce width of text/spin controls because they're too large
 on Windows

---
 lib/Slic3r/GUI/OptionsGroup.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Slic3r/GUI/OptionsGroup.pm b/lib/Slic3r/GUI/OptionsGroup.pm
index 343dd802b2..61a3b7a54b 100644
--- a/lib/Slic3r/GUI/OptionsGroup.pm
+++ b/lib/Slic3r/GUI/OptionsGroup.pm
@@ -168,7 +168,8 @@ sub _build_field {
     if ($opt->{type} =~ /^(i|f|s|s@)$/) {
         my $style = 0;
         $style = wxTE_MULTILINE if $opt->{multiline};
-        my $size = Wx::Size->new($opt->{width} || -1, $opt->{height} || -1);
+        # default width on Windows is too large
+        my $size = Wx::Size->new($opt->{width} || 60, $opt->{height} || -1);
         
         $field = $opt->{type} eq 'i'
             ? Wx::SpinCtrl->new($self->parent, -1, $opt->{default}, wxDefaultPosition, $size, $style, $opt->{min} || 0, $opt->{max} || 2147483647, $opt->{default})