[Arsperl-devel] ARSperl/infra exsi.pl,1.3,1.4

[Thilo S. <ts...@us...>]

Update of /cvsroot/arsperl/ARSperl/infra
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv19729/infra

Modified Files:
	exsi.pl 
Log Message:
arsystem 7.5 port, AR*Image functions

Index: exsi.pl
===================================================================
RCS file: /cvsroot/arsperl/ARSperl/infra/exsi.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** exsi.pl	24 Sep 2008 13:03:14 -0000	1.3
--- exsi.pl	31 Mar 2009 17:41:18 -0000	1.4
***************
*** 16,21 ****
  #
  # $Log$
! # Revision 1.3  2008/09/24 13:03:14  tstapff
! # bugfix for serverTypeInfoHints.h
  #
  # Revision 1.2  2007/09/13 22:50:26  tstapff
--- 16,24 ----
  #
  # $Log$
! # Revision 1.4  2009/03/31 17:41:18  tstapff
! # arsystem 7.5 port, AR*Image functions
! #
! # Revision 1.3  2008/09/24 13:03:14  tstapff
! # bugfix for serverTypeInfoHints.h
  #
  # Revision 1.2  2007/09/13 22:50:26  tstapff
***************
*** 57,60 ****
--- 60,65 ----
  		die "!!! ERROR: Cannot determine type for AR_SERVER_INFO constant $ct !!!" if $siv != $ct;
  
+ 		next if $sit eq 'deprecated';
+ 
  		# jump thru some more hoops
  
***************
*** 85,88 ****
--- 90,100 ----
  		$sit = "char" if $sin eq "AR_SERVER_INFO_GUID_PREFIX";
  
+ 		$sit = "char" if $sin eq "AR_SERVER_INFO_FT_COLLECTION_DIR";     # deprecated in 7.5
+ 		$sit = "char" if $sin eq "AR_SERVER_INFO_FT_CONFIGURATION_DIR";  # deprecated in 7.5
+ 		$sit = "char" if $sin eq "AR_SERVER_INFO_FT_TEMP_DIR";           # deprecated in 7.5
+ 
+ 		$sit = "int" if $sin eq "AR_SERVER_INFO_LICENSE_USAGE";
+ 		$sit = "int" if $sin eq "AR_SERVER_INFO_MAX_CLIENT_MANAGED_TRANSACTIONS";
+ 		$sit = "int" if $sin eq "AR_SERVER_INFO_CLIENT_MANAGED_TRANSACTION_TIMEOUT";
  
  		#print "\t/*$sin [$siv] is an $sit*/\n";