sw/source/ui/vba/vbalistformat.cxx | 45 ++++++++++++++++++++++++++++--------- 1 file changed, 35 insertions(+), 10 deletions(-)
New commits: commit be50e025724d80009aaf8859a9d6ade6d511b2dd Author: Mike Kaganski <[email protected]> AuthorDate: Sun Aug 23 17:29:54 2020 +0300 Commit: Mike Kaganski <[email protected]> CommitDate: Sun Aug 23 17:36:34 2020 +0200 Process nested paragraphs (e.g., in tables) in ConvertNumbersToText Additionally process higher outline levels - make sure to convert them to text, not to just decrease their level. And correct the tabstop position (TODO: does this depend on compat option TabsRelativeToIndent?) Change-Id: I600f10811c542c1de716457e6c4547c9e8352408 Reviewed-on: https://gerrit.libreoffice.org/c/core/+/101240 Tested-by: Jenkins Reviewed-by: Mike Kaganski <[email protected]> diff --git a/sw/source/ui/vba/vbalistformat.cxx b/sw/source/ui/vba/vbalistformat.cxx index d8642cb7fab0..798ca6fb29f7 100644 --- a/sw/source/ui/vba/vbalistformat.cxx +++ b/sw/source/ui/vba/vbalistformat.cxx @@ -28,6 +28,7 @@ #include <com/sun/star/beans/XPropertySet.hpp> #include <com/sun/star/style/TabStop.hpp> #include <com/sun/star/text/PositionAndSpaceMode.hpp> +#include <com/sun/star/text/XTextTable.hpp> #include <com/sun/star/util/Color.hpp> #include <comphelper/sequence.hxx> #include <comphelper/sequenceashashmap.hxx> @@ -98,6 +99,35 @@ void SAL_CALL SwVbaListFormat::ApplyListTemplate( const css::uno::Reference< wor while( xEnum->hasMoreElements() ); } +template <class Ref> +static void addParagraphsToList(const Ref& a, + std::vector<css::uno::Reference<css::beans::XPropertySet>>& rList) +{ + if (css::uno::Reference<css::lang::XServiceInfo> xInfo{ a, css::uno::UNO_QUERY }) + { + if (xInfo->supportsService("com.sun.star.text.Paragraph")) + { + rList.emplace_back(xInfo, css::uno::UNO_QUERY_THROW); + } + else if (xInfo->supportsService("com.sun.star.text.TextTable")) + { + css::uno::Reference<css::text::XTextTable> xTable(xInfo, css::uno::UNO_QUERY_THROW); + const auto aNames = xTable->getCellNames(); + for (const auto& rName : aNames) + { + addParagraphsToList(xTable->getCellByName(rName), rList); + } + } + } + if (css::uno::Reference<css::container::XEnumerationAccess> xEnumAccess{ a, + css::uno::UNO_QUERY }) + { + auto xEnum = xEnumAccess->createEnumeration(); + while (xEnum->hasMoreElements()) + addParagraphsToList(xEnum->nextElement(), rList); + } +} + void SAL_CALL SwVbaListFormat::ConvertNumbersToText( ) { css::uno::Reference<css::frame::XModel> xModel(getThisWordDoc(mxContext)); @@ -111,15 +141,8 @@ void SAL_CALL SwVbaListFormat::ConvertNumbersToText( ) xUndoManager->leaveUndoContext(); }); - css::uno::Reference<css::container::XEnumerationAccess> xEnumAccess(mxTextRange, - css::uno::UNO_QUERY_THROW); - auto xEnum = xEnumAccess->createEnumeration(); - if (!xEnum->hasMoreElements()) - return; - std::vector<css::uno::Reference<css::beans::XPropertySet>> aParagraphs; - while (xEnum->hasMoreElements()) - aParagraphs.emplace_back(xEnum->nextElement(), css::uno::UNO_QUERY_THROW); + addParagraphsToList(mxTextRange, aParagraphs); // in reverse order, to get proper label strings for (auto it = aParagraphs.rbegin(); it != aParagraphs.rend(); ++it) @@ -243,7 +266,7 @@ void SAL_CALL SwVbaListFormat::ConvertNumbersToText( ) css::uno::Sequence<css::style::TabStop> stops; (*it)->getPropertyValue("ParaTabStops") >>= stops; css::style::TabStop tabStop{}; - tabStop.Position = nListtabStopPosition - nIndentAt; + tabStop.Position = nListtabStopPosition; tabStop.Alignment = com::sun::star::style::TabAlign::TabAlign_LEFT; tabStop.FillChar = ' '; (*it)->setPropertyValue( @@ -257,7 +280,9 @@ void SAL_CALL SwVbaListFormat::ConvertNumbersToText( ) // TODO: css::text::PositionAndSpaceMode::LABEL_WIDTH_AND_POSITION continue; // for now, keep such lists as is } - (*it)->setPropertyValue("NumberingRules", css::uno::Any()); + // In case of higher outline levels, each assignment of empty value just sets level 1 + while ((*it)->getPropertyValue("NumberingRules") != css::uno::Any()) + (*it)->setPropertyValue("NumberingRules", css::uno::Any()); } } } _______________________________________________ Libreoffice-commits mailing list [email protected] https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits
