From f9aa6f14d6b7060693afac5048b4e905ca07967a Mon Sep 17 00:00:00 2001
From: Marc Lehmann <pcg@src.gnome.org>
Date: Wed, 25 Aug 1999 20:35:48 +0000
Subject: [PATCH] see plug-ins/perl/Changes

---
 plug-ins/perl/Changes     | 1 +
 plug-ins/perl/Gimp.pm     | 2 +-
 plug-ins/perl/Gimp/Lib.xs | 6 +++---
 3 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/plug-ins/perl/Changes b/plug-ins/perl/Changes
index c948eb4ea9..96da5927da 100644
--- a/plug-ins/perl/Changes
+++ b/plug-ins/perl/Changes
@@ -2,6 +2,7 @@ Revision history for Gimp-Perl extension.
 
 1.12  Tue Aug 24 19:30:29 CEST 1999
 	- do not emit warning for function names prefixed with "+".
+        - removed non-c89 ansi'isms from Lib.xs.
 
 1.11  Tue Aug  3 03:23:23 CEST 1999
 	- EXPERIMENTALLY re-enabled the return path from main. It works
diff --git a/plug-ins/perl/Gimp.pm b/plug-ins/perl/Gimp.pm
index 3aa9876116..7f361c88f2 100644
--- a/plug-ins/perl/Gimp.pm
+++ b/plug-ins/perl/Gimp.pm
@@ -12,7 +12,7 @@ use subs qw(init end lock unlock canonicalize_color);
 require DynaLoader;
 
 @ISA=qw(DynaLoader);
-$VERSION = 1.11;
+$VERSION = 1.12;
 
 @_param = qw(
 	PARAM_BOUNDARY	PARAM_CHANNEL	PARAM_COLOR	PARAM_DISPLAY	PARAM_DRAWABLE
diff --git a/plug-ins/perl/Gimp/Lib.xs b/plug-ins/perl/Gimp/Lib.xs
index 4db50af6b8..1a139e649e 100644
--- a/plug-ins/perl/Gimp/Lib.xs
+++ b/plug-ins/perl/Gimp/Lib.xs
@@ -330,9 +330,9 @@ trace_init ()
     SvCUR_set (trace_var, 0);
 }
 
-#ifndef __STDC_VERSION__
-#warn You need to compile with an ansi-c compiler!!!
-#warn Compilation will continue at your own risk!!
+#ifndef __STDC__
+#error You need to compile with an ansi-c compiler!!!
+#error Compilation will continue at your own risk!!
 #define __STDC_VERSION__ 0
 #endif