filter/source/msfilter/escherex.cxx | 9 +++++++++
1 file changed, 9 insertions(+)
New commits:
commit b82ed78c88b368747be8baccda76733a3bdfe591
Author: Jürgen Schmidt <j...@apache.org>
Date: Fri Jun 8 15:08:31 2012 +0000
i#119870: Line transparency value is lost after saving as another ppt by AOO
fix: export linetransparency attribute
Patch By: Lei Debin
Found By: phoenix wanglf
Review By: jsc
Change-Id: I56a589036d1e4e2399f5a1a94283ebd4ce2126f0
diff --git a/filter/source/msfilter/escherex.cxx
b/filter/source/msfilter/escherex.cxx
index 7fbe40a..34fe8a5 100644
--- a/filter/source/msfilter/escherex.cxx
+++ b/filter/source/msfilter/escherex.cxx
@@ -967,6 +967,15 @@ void EscherPropertyContainer::CreateLineProperties(
}
AddOpt( ESCHER_Prop_lineJoinStyle, eLineJoin );
+ if ( EscherPropertyValueHelper::GetPropertyValue(
+ aAny, rXPropSet, String( RTL_CONSTASCII_USTRINGPARAM(
"LineTransparence" ) ), sal_True ) )
+ {
+ sal_Int16 nTransparency = 0;
+ if ( aAny >>= nTransparency )
+ AddOpt( ESCHER_Prop_lineOpacity, ( ( 100 - nTransparency ) << 16 )
/ 100 );
+ }
+
+
if ( bEdge == sal_False )
{
AddOpt( ESCHER_Prop_fFillOK, 0x1001 );
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits
