diff --git a/lib/Slic3r/GUI.pm b/lib/Slic3r/GUI.pm
index 2b3b8a640..8cbc38593 100644
--- a/lib/Slic3r/GUI.pm
+++ b/lib/Slic3r/GUI.pm
@@ -12,6 +12,7 @@ use base 'Wx::App';
 sub OnInit {
     my $self = shift;
     
+    $self->SetAppName('Slic3r');
     #$self->SetIcon(Wx::Icon->new("path/to/my/icon.gif", wxBITMAP_TYPE_GIF) );
     
     my $frame = Wx::Frame->new( undef, -1, 'Slic3r', [-1, -1], Wx::wxDefaultSize,