[gimp-perl] Don't really need to "use G::E" - just qualify function calls.
- From: Ed J <edj src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gimp-perl] Don't really need to "use G::E" - just qualify function calls.
- Date: Tue, 20 May 2014 03:03:06 +0000 (UTC)
commit 53c7a958bff5e656c6ec3863ee62596a0ac021f0
Author: Ed J <edj src gnome org>
Date: Tue May 20 04:01:48 2014 +0100
Don't really need to "use G::E" - just qualify function calls.
Net/Net.pm | 5 ++---
1 files changed, 2 insertions(+), 3 deletions(-)
---
diff --git a/Net/Net.pm b/Net/Net.pm
index c77245b..65f4953 100644
--- a/Net/Net.pm
+++ b/Net/Net.pm
@@ -31,7 +31,6 @@ use base qw(DynaLoader);
use IO::Socket;
use Carp 'croak';
use Fcntl qw(F_SETFD);
-use Gimp::Extension;
$VERSION = 2.3003;
bootstrap Gimp::Net $VERSION;
@@ -344,7 +343,7 @@ sub setup_listen_unix {
my $dir = dirname($host);
mkdir $dir, 0700 unless -d $dir;
unlink $host if -e $host;
- add_listener(IO::Socket::UNIX->new(
+ Gimp::Extension::add_listener(IO::Socket::UNIX->new(
Type => SOCK_STREAM, Local => $host, Listen => 5
), \&on_input, \&on_accept);
slog __"accepting connections in $host";
@@ -356,7 +355,7 @@ sub setup_listen_tcp {
my $host = shift;
($host, my $port)=split /:/,$host;
$port = $DEFAULT_TCP_PORT unless $port;
- add_listener(IO::Socket::INET->new(
+ Gimp::Extension::add_listener(IO::Socket::INET->new(
Type => SOCK_STREAM, LocalPort => $port, Listen => 5, ReuseAddr => 1,
($host ? (LocalAddr => $host) : ()),
), \&on_input, \&on_accept);
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]