Index: libs/mod_neko/cgi.c
===================================================================
RCS file: /cvsroot/neko/libs/mod_neko/cgi.c,v
retrieving revision 1.29
diff -u -r1.29 cgi.c
--- libs/mod_neko/cgi.c	29 Apr 2008 12:22:35 -0000	1.29
+++ libs/mod_neko/cgi.c	9 Jul 2008 13:01:41 -0000
@@ -557,6 +557,21 @@
 	return alloc_string(CONTEXT()->r->method);
 }
 
+static value log_rerror( value message, value level ) {
+	mcontext *c = CONTEXT();
+
+	val_check(message, string);
+	val_check(level, int);
+
+#ifdef APACHE_2_X
+	ap_log_rerror(__FILE__, __LINE__, val_int(level), APR_SUCCESS, c->r, "[mod_neko] %s", val_string(message));
+#else
+	ap_log_rerror(__FILE__, __LINE__, val_int(level), c->r, "[mod_neko] %s", val_string(message));
+#endif	
+
+	return val_null;
+}
+
 DEFINE_PRIM(cgi_get_cwd,0);
 DEFINE_PRIM(cgi_set_main,1);
 DEFINE_PRIM(get_cookies,0);
@@ -578,5 +593,6 @@
 DEFINE_PRIM(cgi_set_config,1);
 DEFINE_PRIM(cgi_command,1);
 DEFINE_PRIM(get_http_method,0);
+DEFINE_PRIM(log_rerror,2);
 
 /* ************************************************************************ */