[gimp-perl] Don't try to DESTROY if socket closed.

[Ed J <edj src gnome org>]

commit e8e73c6502761f74c0b4bc9a4bbcb352de9e2118
Author: Ed J <edj src gnome org>
Date:   Fri May 23 21:24:43 2014 +0100

    Don't try to DESTROY if socket closed.

 Net/Net.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/Net/Net.pm b/Net/Net.pm
index 65cc230..b8a2a6a 100644
--- a/Net/Net.pm
+++ b/Net/Net.pm
@@ -73,7 +73,7 @@ sub import {
    *Gimp::PixelRgn::DESTROY=
    *Gimp::GimpDrawable::DESTROY=sub {
       # is synchronous which avoids deadlock from using non sys*-type functions
-      command "DTRY", @_;
+      command "DTRY", @_ if $server_fh;
    };
 }