@@ -488,27 +488,15 @@ ConfigureMessage(
488488 * be specified to Tk_ConfigureWidget.
489489 */
490490
491- Tk_GetPixelsFromObj (NULL , msgPtr -> tkwin , msgPtr -> widthObj , & width );
492- if (width < 0 ) {
493- if (msgPtr -> widthObj ) {
494- Tcl_DecrRefCount (msgPtr -> widthObj );
495- }
496- msgPtr -> widthObj = Tcl_NewIntObj (0 );
497- Tcl_IncrRefCount (msgPtr -> widthObj );
498- }
499491 Tk_GetPixelsFromObj (NULL , msgPtr -> tkwin , msgPtr -> borderWidthObj , & borderWidth );
500492 if (borderWidth < 0 ) {
501- if (msgPtr -> borderWidthObj ) {
502- Tcl_DecrRefCount (msgPtr -> borderWidthObj );
503- }
493+ Tcl_DecrRefCount (msgPtr -> borderWidthObj );
504494 msgPtr -> borderWidthObj = Tcl_NewIntObj (0 );
505495 Tcl_IncrRefCount (msgPtr -> borderWidthObj );
506496 }
507497 Tk_GetPixelsFromObj (NULL , msgPtr -> tkwin , msgPtr -> highlightWidthObj , & highlightWidth );
508498 if (highlightWidth < 0 ) {
509- if (msgPtr -> highlightWidthObj ) {
510- Tcl_DecrRefCount (msgPtr -> highlightWidthObj );
511- }
499+ Tcl_DecrRefCount (msgPtr -> highlightWidthObj );
512500 msgPtr -> highlightWidthObj = Tcl_NewIntObj (0 );
513501 Tcl_IncrRefCount (msgPtr -> highlightWidthObj );
514502 }
@@ -526,6 +514,12 @@ ConfigureMessage(
526514 msgPtr -> padYObj = NULL ;
527515 }
528516 }
517+ Tk_GetPixelsFromObj (NULL , msgPtr -> tkwin , msgPtr -> widthObj , & width );
518+ if (width < 0 ) {
519+ Tcl_DecrRefCount (msgPtr -> widthObj );
520+ msgPtr -> widthObj = Tcl_NewIntObj (0 );
521+ Tcl_IncrRefCount (msgPtr -> widthObj );
522+ }
529523
530524 Tk_FreeSavedOptions (& savedOptions );
531525 MessageWorldChanged (msgPtr );
0 commit comments