[Arsperl-devel] ARSperl ARS.xs,1.113,1.114

[Michiel B. <mb...@us...>]

Update of /cvsroot/arsperl/ARSperl
In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv21778

Modified Files:
	ARS.xs 
Log Message:
ars_APIVersion now uses AR_CURRENT_API_VERSION rather than AR_EXPORT_VERSION so the version level that comes back is more useful.
It now matches the Minimum-Api-Version setting in ar.conf.

However this means the number for v7 is 12 instead of 9.

Index: ARS.xs
===================================================================
RCS file: /cvsroot/arsperl/ARSperl/ARS.xs,v
retrieving revision 1.113
retrieving revision 1.114
diff -C2 -d -r1.113 -r1.114
*** ARS.xs	21 Apr 2007 22:22:06 -0000	1.113
--- ARS.xs	24 Jul 2007 20:48:27 -0000	1.114
***************
*** 154,158 ****
  	CODE:
  	{
! 		RETVAL = AR_EXPORT_VERSION;
  	}
  	OUTPUT:
--- 154,158 ----
  	CODE:
  	{
! 		RETVAL = AR_CURRENT_API_VERSION;
  	}
  	OUTPUT:
***************
*** 6847,6851 ****
  		}
  	/* SetSessionConfiguration_fail:; */
! #else /* < 5.0 */
  	  XPUSHs(sv_2mortal(newSViv(0))); /* ERR */
  	  (void) ARError_add( AR_RETURN_ERROR, AP_ERR_DEPRECATED, 
--- 6847,6851 ----
  		}
  	/* SetSessionConfiguration_fail:; */
! #else /* < 7.0 */
  	  XPUSHs(sv_2mortal(newSViv(0))); /* ERR */
  	  (void) ARError_add( AR_RETURN_ERROR, AP_ERR_DEPRECATED,