Also use style for UpdateRelStyle

pull/218/head
Fredrik 4 years ago committed by GitHub
parent f2611789a6
commit 4fbd768480
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

@ -320,8 +320,12 @@ $tagSkin
!endfunction
!unquoted procedure $defineRelSkinparams($tagStereo, $textColor, $lineColor, $lineStyle, $lineThickness)
!$defaultLineColor = %get_variable_value("$relDefaultLineColor")
!$defaultTextColor = %get_variable_value("$relDefaultTextColor")
!$elementSkin = "<style>" + %newline()
!$elementSkin = $elementSkin + "arrow {" + %newline()
!$elementSkin = $elementSkin + " LineColor " + $defaultLineColor + %newline()
!$elementSkin = $elementSkin + " FontColor " + $defaultTextColor + %newline()
!$elementSkin = $elementSkin + " ." + $tagStereo + " {" + %newline()
!if ($lineColor != "")
!$elementSkin = $elementSkin + " LineColor " + $lineColor + %newline()
@ -730,10 +734,14 @@ UpdateElementStyle($elementName, $bgColor, $fontColor, $borderColor, $shadowing)
' update the style of default relation, it has to set both properties (combined statement not working)
!unquoted procedure UpdateRelStyle($textColor, $lineColor)
!$elementSkin = "skinparam arrow {" + %newline()
!$elementSkin = $elementSkin + " Color " + $lineColor + %newline()
%set_variable_value("$relDefaultLineColor", $lineColor)
%set_variable_value("$relDefaultTextColor", $textColor)
!$elementSkin = "<style>" + %newline()
!$elementSkin = $elementSkin + "arrow {" + %newline()
!$elementSkin = $elementSkin + " LineColor " + $lineColor + %newline()
!$elementSkin = $elementSkin + " FontColor " + $textColor + %newline()
!$elementSkin = $elementSkin + "}" + %newline()
!$elementSkin = $elementSkin + "</style>" + %newline()
$elementSkin
!endprocedure

Loading…
Cancel
Save