see plug-ins/perl/Changes

This commit is contained in:
Marc Lehmann
1999-06-17 21:24:48 +00:00
parent 227021fce1
commit 5fa1df3fc5
2 changed files with 2 additions and 1 deletions

View File

@ -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;

View File

@ -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;