diff options
| author | Noel Power <noel.power@suse.com> | 2013-05-03 14:08:25 +0100 |
|---|---|---|
| committer | Noel Power <noel.power@suse.com> | 2013-05-09 14:11:20 +0100 |
| commit | 7e735236e93754078dffa0c5c85316be87a5ce9f (patch) | |
| tree | aa4391e2dbc937857869c86b5761c8dff139d9c0 | |
| parent | 569c019883f0c1bb624d2dddb12914facd30e82b (diff) | |
add new test for Workbooks
Change-Id: Id271f10ac82ebae9fedd68d30c7f44435d60751d
| -rw-r--r-- | sc/qa/extras/macros-test.cxx | 17 | ||||
| -rwxr-xr-x | sc/qa/extras/testdocuments/Workbooks.xls | bin | 0 -> 37888 bytes |
2 files changed, 14 insertions, 3 deletions
diff --git a/sc/qa/extras/macros-test.cxx b/sc/qa/extras/macros-test.cxx index a610217e2ff6..9fc81474cb73 100644 --- a/sc/qa/extras/macros-test.cxx +++ b/sc/qa/extras/macros-test.cxx @@ -175,8 +175,21 @@ void ScMacrosTest::testVba() OUString("MiscControlTests."), OUString("vnd.sun.Star.script:VBAProject.testMacros.test?language=Basic&location=document") }, + { + OUString("Workbooks."), + OUString("vnd.sun.Star.script:VBAProject.testMacros.test?language=Basic&location=document") + }, }; - + OUString sTempDir; + OUString sTempDirURL; + osl::FileBase:: getTempDirURL( sTempDirURL ); + osl::FileBase::getSystemPathFromFileURL( sTempDirURL, sTempDir ); + Sequence< uno::Any > aParams; + if ( !sTempDir.isEmpty() ) + { + aParams.realloc(1); + aParams[ 0 ] <<= sTempDir; + } for ( sal_uInt32 i=0; i<SAL_N_ELEMENTS( testInfo ); ++i ) { OUString aFileName; @@ -189,8 +202,6 @@ void ScMacrosTest::testVba() Any aRet; Sequence< sal_Int16 > aOutParamIndex; Sequence< Any > aOutParam; - Sequence< uno::Any > aParams; - SfxObjectShell* pFoundShell = SfxObjectShell::GetShellFromComponent(xComponent); CPPUNIT_ASSERT_MESSAGE("Failed to access document shell", pFoundShell); diff --git a/sc/qa/extras/testdocuments/Workbooks.xls b/sc/qa/extras/testdocuments/Workbooks.xls Binary files differnew file mode 100755 index 000000000000..a732167be71b --- /dev/null +++ b/sc/qa/extras/testdocuments/Workbooks.xls |