summaryrefslogtreecommitdiffstats
path: root/generic/tkTextTag.c
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2016-02-09 21:36:19 (GMT)
committerfvogel <fvogelnew1@free.fr>2016-02-09 21:36:19 (GMT)
commitda061a037670e4bc29f960a349403aac50cd915c (patch)
tree95981a882f67c7265356d2d0b262cb690931eff6 /generic/tkTextTag.c
parentfe236b4cfe544d14e84df23e27d07f7efba752d5 (diff)
downloadtk-da061a037670e4bc29f960a349403aac50cd915c.zip
tk-da061a037670e4bc29f960a349403aac50cd915c.tar.gz
tk-da061a037670e4bc29f960a349403aac50cd915c.tar.bz2
-selectfgstipple tag configuration option: implementation
Diffstat (limited to 'generic/tkTextTag.c')
-rw-r--r--generic/tkTextTag.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tkTextTag.c b/generic/tkTextTag.c
index 86a6e77..bb512e4 100644
--- a/generic/tkTextTag.c
+++ b/generic/tkTextTag.c
@@ -74,6 +74,8 @@ static const Tk_OptionSpec tagOptionSpecs[] = {
NULL, -1, Tk_Offset(TkTextTag, selBorder), TK_OPTION_NULL_OK, 0, 0},
{TK_OPTION_BITMAP, "-selectbgstipple", NULL, NULL,
NULL, -1, Tk_Offset(TkTextTag, selBgStipple), TK_OPTION_NULL_OK, 0, 0},
+ {TK_OPTION_BITMAP, "-selectfgstipple", NULL, NULL,
+ NULL, -1, Tk_Offset(TkTextTag, selFgStipple), TK_OPTION_NULL_OK, 0, 0},
{TK_OPTION_COLOR, "-selectforeground", NULL, NULL,
NULL, -1, Tk_Offset(TkTextTag, selFgColor), TK_OPTION_NULL_OK, 0, 0},
{TK_OPTION_STRING, "-spacing1", NULL, NULL,
@@ -530,6 +532,7 @@ TkTextTagCmd(
|| (tagPtr->fgColor != NULL)
|| (tagPtr->selFgColor != NULL)
|| (tagPtr->fgStipple != None)
+ || (tagPtr->selFgStipple != None)
|| (tagPtr->overstrikeString != NULL)
|| (tagPtr->underlineString != NULL)) {
tagPtr->affectsDisplay = 1;
@@ -1037,6 +1040,7 @@ TkTextCreateTag(
tagPtr->selBorder = NULL;
tagPtr->selBgStipple = None;
tagPtr->selFgColor = NULL;
+ tagPtr->selFgStipple = None;
tagPtr->spacing1String = NULL;
tagPtr->spacing1 = 0;
tagPtr->spacing2String = NULL;