From dde3e6e870976d677d10d20cd7c140090309d18e Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Mon, 29 Apr 2013 15:57:07 +0200
Subject: [PATCH] Disable Net::DBus. #1015

---
 Build.PL          | 1 -
 lib/Slic3r/GUI.pm | 3 ++-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Build.PL b/Build.PL
index 4b8ad7eff..0f756ed20 100644
--- a/Build.PL
+++ b/Build.PL
@@ -28,7 +28,6 @@ my $build = Module::Build->new(
     recommends     => {
         'Class::XSAccessor' => '0',
         'Growl::GNTP' => '0.15',
-        'Net::DBus'   => '0',
         'XML::SAX::ExpatXS' => '0',
         'Wx'          => '0.9901',
     },
diff --git a/lib/Slic3r/GUI.pm b/lib/Slic3r/GUI.pm
index 4e3321a17..b825603b5 100644
--- a/lib/Slic3r/GUI.pm
+++ b/lib/Slic3r/GUI.pm
@@ -480,7 +480,8 @@ sub notify {
         $self->{growler}->notify(Event => 'SKEIN_DONE', Title => $title, Message => $message)
             if $self->{growler};
     };
-    if (eval 'use Net::DBus; 1') {
+    # Net::DBus is broken in multithreaded environment
+    if (0 && eval 'use Net::DBus; 1') {
         eval {
             my $session = Net::DBus->session;
             my $serv = $session->get_service('org.freedesktop.Notifications');