diff -u -r ./old/oovbaapi/genconstidl/api-to-idl.pl ./new/oovbaapi/genconstidl/api-to-idl.pl --- ./old/oovbaapi/genconstidl/api-to-idl.pl 2009-12-26 10:59:40.000000000 +0800 +++ ./new/oovbaapi/genconstidl/api-to-idl.pl 2010-02-28 17:12:34.000000000 +0800 @@ -5,7 +5,7 @@ # # DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. # -# Copyright 2008 by Sun Microsystems, Inc. +# Copyright 2008, 2010 by Sun Microsystems, Inc. # # OpenOffice.org - a multi-platform office productivity suite # @@ -129,6 +129,9 @@ foreach $module ( keys %result ) { foreach $type ( keys %{$result{$module}} ) { my $fname = $path . "/" . $type . ".idl"; + if ( uc($module) eq "ADODB" || uc($module) eq "DAO" ) { + $fname = $path . "/" . uc($module) . "_" . $type . ".idl"; + } open( IDL, ">$fname" ) || die "Cannot write $fname."; if( $module eq "vba" ) {