writerfilter/source/dmapper/DomainMapper_Impl.cxx |   25 ++++++++++++++--------
 1 file changed, 16 insertions(+), 9 deletions(-)

New commits:
commit 3a248dfe57318af57fc5df89652cb64dfa923e46
Author:     Jan-Marek Glogowski <jan-marek.glogow...@extern.cib.de>
AuthorDate: Mon Jan 20 17:33:41 2020 +0100
Commit:     Jan-Marek Glogowski <glo...@fbihome.de>
CommitDate: Thu Jan 30 13:42:18 2020 +0100

    tdf#129237 just add content checks for Input fields
    
    There seems to be fields with content values, which don't use it
    as the presentation value. So this reverts the content handling
    code back to the original one and just checks the content value
    from Input fields in addition to the SetExpression fields.
    
    Change-Id: I2abd227883035c559b1fc3f7aacf10769b0e79a8
    Reviewed-on: https://gerrit.libreoffice.org/c/core/+/87093
    Tested-by: Jenkins
    Reviewed-by: Jan-Marek Glogowski <glo...@fbihome.de>

diff --git a/writerfilter/source/dmapper/DomainMapper_Impl.cxx 
b/writerfilter/source/dmapper/DomainMapper_Impl.cxx
index 03c77eda6a83..f5bab69875ae 100644
--- a/writerfilter/source/dmapper/DomainMapper_Impl.cxx
+++ b/writerfilter/source/dmapper/DomainMapper_Impl.cxx
@@ -5633,17 +5633,24 @@ void DomainMapper_Impl::SetFieldResult(OUString const& 
rResult)
                     else
                     {
                         uno::Reference< beans::XPropertySet > 
xFieldProperties( xTextField, uno::UNO_QUERY_THROW);
-                        OUString sContent;
-                        bool bCanHaveContent = false;
-                        try
-                        {   // this will throw for field types without Content 
property
-                            uno::Any 
aValue(xFieldProperties->getPropertyValue(getPropertyName(PROP_CONTENT)));
-                            bCanHaveContent = true;
-                            aValue >>= sContent;
+                        // In case of SetExpression, and Input fields the 
field result contains the content of the variable.
+                        uno::Reference<lang::XServiceInfo> 
xServiceInfo(xTextField, uno::UNO_QUERY);
+                        // there are fields with a content property, which 
aren't working correctly with
+                        // a generalized try catch of the content, property, 
so just restrict content
+                        // handling to these explicit services.
+                        const bool bHasContent = 
xServiceInfo->supportsService("com.sun.star.text.TextField.SetExpression") ||
+                            
xServiceInfo->supportsService("com.sun.star.text.TextField.Input");
+                        // If we already have content set, then use the 
current presentation
+                        OUString sValue;
+                        if (bHasContent)
+                        {
+                            // this will throw for field types without Content
+                            uno::Any aValue(xFieldProperties->getPropertyValue(
+                                    getPropertyName(PROP_CONTENT)));
+                            aValue >>= sValue;
                         }
-                        catch (...) {}
                         xFieldProperties->setPropertyValue(
-                                getPropertyName(bCanHaveContent && 
sContent.isEmpty()? PROP_CONTENT : PROP_CURRENT_PRESENTATION),
+                                getPropertyName(bHasContent && 
sValue.isEmpty()? PROP_CONTENT : PROP_CURRENT_PRESENTATION),
                              uno::makeAny( rResult ));
                     }
                 }
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits

Reply via email to