From 5477d66902bd0c225350a9f027f05de32a98c343 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sat, 9 Mar 2013 14:55:07 +0100
Subject: [PATCH] Advertise the expert mode in simple mode

---
 lib/Slic3r/GUI/Tab.pm | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/lib/Slic3r/GUI/Tab.pm b/lib/Slic3r/GUI/Tab.pm
index dac06e338..13ae7d729 100644
--- a/lib/Slic3r/GUI/Tab.pm
+++ b/lib/Slic3r/GUI/Tab.pm
@@ -918,7 +918,7 @@ sub load_external_config {
 }
 
 package Slic3r::GUI::Tab::Page;
-use Wx qw(:misc :panel :sizer);
+use Wx qw(:misc :panel :sizer :systemsettings);
 use base 'Wx::ScrolledWindow';
 
 use List::Util qw(max);
@@ -933,8 +933,11 @@ sub new {
     
     $self->SetScrollbars(1, 1, 1, 1);
     
+    $self->{vsizer} = Wx::BoxSizer->new(wxVERTICAL);
+    $self->SetSizer($self->{vsizer});
+    
     $self->{hsizer} = Wx::BoxSizer->new(wxHORIZONTAL);
-    $self->SetSizer($self->{hsizer});
+    $self->{vsizer}->Add($self->{hsizer}, 0, wxEXPAND | wxALL, 0);
     
     if ($params{optgroups}) {
         $_->{column} //= 0 for @{$params{optgroups}};
@@ -950,6 +953,12 @@ sub new {
         }
     }
     
+    if ($parent->{mode} ne 'expert') {
+        my $label = Wx::StaticText->new($self, -1, "Want more options? Switch to the Expert Mode.", wxDefaultPosition, wxDefaultSize);
+        $label->SetFont(Wx::SystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
+        $self->{vsizer}->Add($label, 0, wxEXPAND | wxALL, 10);
+    }
+    
     return $self;
 }