diff options
author | fvogel <fvogelnew1@free.fr> | 2017-03-06 18:30:38 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2017-03-06 18:30:38 (GMT) |
commit | aa4022a388d07e718331f5a593fc2ed6e0572fa9 (patch) | |
tree | 27c3725d4665d10c2a3ff930291e0c1a12e73265 /generic/ttk/ttkButton.c | |
parent | e98430e7e070536bd9d5ccb44afa4976b735ff65 (diff) | |
download | tk-aa4022a388d07e718331f5a593fc2ed6e0572fa9.zip tk-aa4022a388d07e718331f5a593fc2ed6e0572fa9.tar.gz tk-aa4022a388d07e718331f5a593fc2ed6e0572fa9.tar.bz2 |
Updated patch from René Zaumseil, now consistent with the proposed implementation at http://wiki.tcl.tk/20059
Diffstat (limited to 'generic/ttk/ttkButton.c')
-rw-r--r-- | generic/ttk/ttkButton.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/ttk/ttkButton.c b/generic/ttk/ttkButton.c index c00754b..ef55ec3 100644 --- a/generic/ttk/ttkButton.c +++ b/generic/ttk/ttkButton.c @@ -23,6 +23,7 @@ typedef struct * Text element resources: */ Tcl_Obj *textObj; + Tcl_Obj *justifyObj; Tcl_Obj *textVariableObj; Tcl_Obj *underlineObj; Tcl_Obj *widthObj; @@ -56,6 +57,9 @@ typedef struct static Tk_OptionSpec BaseOptionSpecs[] = { + {TK_OPTION_JUSTIFY, "-justify", "justify", "Justify", + "left", Tk_Offset(Base,base.justifyObj), -1, + TK_OPTION_NULL_OK,0,GEOMETRY_CHANGED }, {TK_OPTION_STRING, "-text", "text", "Text", "", Tk_Offset(Base,base.textObj), -1, 0,0,GEOMETRY_CHANGED }, |