summaryrefslogtreecommitdiff
path: root/sc/qa
diff options
context:
space:
mode:
authorNoel Power <noel.power@suse.com>2013-05-03 14:08:25 +0100
committerNoel Power <noel.power@suse.com>2013-05-09 14:11:20 +0100
commit7e735236e93754078dffa0c5c85316be87a5ce9f (patch)
treeaa4391e2dbc937857869c86b5761c8dff139d9c0 /sc/qa
parent569c019883f0c1bb624d2dddb12914facd30e82b (diff)
add new test for Workbooks
Change-Id: Id271f10ac82ebae9fedd68d30c7f44435d60751d
Diffstat (limited to 'sc/qa')
-rw-r--r--sc/qa/extras/macros-test.cxx17
-rwxr-xr-xsc/qa/extras/testdocuments/Workbooks.xlsbin0 -> 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
new file mode 100755
index 000000000000..a732167be71b
--- /dev/null
+++ b/sc/qa/extras/testdocuments/Workbooks.xls
Binary files differ