WW8 filter: zoom type testcase

Change-Id: I57f90a84b49c4a3bd49c66e23d059939684a6aef
Reviewed-on: https://gerrit.libreoffice.org/13765Reviewed-by: Miklos Vajna <vmiklos@collabora.co.uk>
Tested-by: Miklos Vajna <vmiklos@collabora.co.uk>

sw/qa/extras/ww8export/ww8export.cxx

@@ -18,6 +18,7 @@
 #include <com/sun/star/table/TableBorder2.hpp>
 #include <com/sun/star/text/GraphicCrop.hpp>
 #include <com/sun/star/text/XFormField.hpp>
+#include <com/sun/star/view/DocumentZoomType.hpp>
 
 class Test : public SwModelTestBase
 {
@@ -115,6 +116,16 @@ DECLARE_WW8EXPORT_TEST(testZoom, "zoom.doc")
     CPPUNIT_ASSERT_EQUAL(sal_Int16(42), nValue);
 }
 
+DECLARE_WW8EXPORT_TEST(testZoomType, "zoomtype.doc")
+{
+    uno::Reference<frame::XModel> xModel(mxComponent, uno::UNO_QUERY);
+    uno::Reference<view::XViewSettingsSupplier> xViewSettingsSupplier(xModel->getCurrentController(), uno::UNO_QUERY);
+    uno::Reference<beans::XPropertySet> xPropertySet(xViewSettingsSupplier->getViewSettings());
+    sal_Int16 nValue = 0;
+    xPropertySet->getPropertyValue("ZoomType") >>= nValue;
+    CPPUNIT_ASSERT_EQUAL(sal_Int16(view::DocumentZoomType::PAGE_WIDTH), nValue);
+}
+
 DECLARE_WW8EXPORT_TEST(test56513, "fdo56513.doc")
 {
     CPPUNIT_ASSERT_EQUAL(OUString("This is the header of the first section"),  parseDump("/root/page[1]/header/txt/text()"));