see plug-ins/perl/Changes
This commit is contained in:
@ -95,6 +95,7 @@ sub present {
|
|||||||
VMS => 1,
|
VMS => 1,
|
||||||
RISCOS => 1,
|
RISCOS => 1,
|
||||||
AmigaOS => 1,
|
AmigaOS => 1,
|
||||||
|
utwin => 1,
|
||||||
}->{$^O};
|
}->{$^O};
|
||||||
} elsif ($_ eq "never") {
|
} elsif ($_ eq "never") {
|
||||||
0;
|
0;
|
||||||
|
@ -220,7 +220,7 @@ sub gimp_init {
|
|||||||
} else {
|
} else {
|
||||||
$server_fh = try_connect ("");
|
$server_fh = try_connect ("");
|
||||||
}
|
}
|
||||||
defined $server_fh or croak "could not connect to the gimp server server (make sure Net-Server is running)";
|
defined $server_fh or croak "could not connect to the gimp server (make sure Net-Server is running)";
|
||||||
{ my $fh = select $server_fh; $|=1; select $fh }
|
{ my $fh = select $server_fh; $|=1; select $fh }
|
||||||
|
|
||||||
my @r = response;
|
my @r = response;
|
||||||
|
Reference in New Issue
Block a user