1 files changed, 73 insertions, 0 deletions
diff --git a/lotuswordpro/qa/cppunit/test_lotuswordpro.cxx b/lotuswordpro/qa/cppunit/test_lotuswordpro.cxx
new file mode 100644
index 000000000..961faa668
--- /dev/null
+++ b/lotuswordpro/qa/cppunit/test_lotuswordpro.cxx
@@ -0,0 +1,73 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ */
+
+#include <unotest/filters-test.hxx>
+#include <test/bootstrapfixture.hxx>
+#include <com/sun/star/document/XFilter.hpp>
+
+#include <osl/file.hxx>
+#include <osl/process.h>
+
+using namespace ::com::sun::star;
+
+namespace
+{
+    class LotusWordProTest
+        : public test::FiltersTest
+        , public test::BootstrapFixture
+    {
+    public:
+        LotusWordProTest() : BootstrapFixture(true, false) {}
+
+        virtual void setUp() override;
+
+        virtual bool load(const OUString &,
+            const OUString &rURL, const OUString &,
+            SfxFilterFlags, SotClipboardFormatId, unsigned int) override;
+
+        void test();
+
+        CPPUNIT_TEST_SUITE(LotusWordProTest);
+        CPPUNIT_TEST(test);
+        CPPUNIT_TEST_SUITE_END();
+    private:
+        uno::Reference<document::XFilter> m_xFilter;
+    };
+
+    void LotusWordProTest::setUp()
+    {
+        test::BootstrapFixture::setUp();
+
+        m_xFilter.set(m_xSFactory->createInstance(
+            "com.sun.star.comp.Writer.LotusWordProImportFilter"),
+            uno::UNO_QUERY_THROW);
+    }
+
+    bool LotusWordProTest::load(const OUString &,
+        const OUString &rURL, const OUString &,
+        SfxFilterFlags, SotClipboardFormatId, unsigned int)
+    {
+        uno::Sequence< beans::PropertyValue > aDescriptor(1);
+        aDescriptor[0].Name = "URL";
+        aDescriptor[0].Value <<= rURL;
+        return m_xFilter->filter(aDescriptor);
+    }
+
+    void LotusWordProTest::test()
+    {
+        testDir(OUString(),
+            m_directories.getURLFromSrc("/lotuswordpro/qa/cppunit/data/"));
+    }
+
+    CPPUNIT_TEST_SUITE_REGISTRATION(LotusWordProTest);
+}
+
+CPPUNIT_PLUGIN_IMPLEMENT();
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */