diff options
Diffstat (limited to 'src/bltGrPenOp.C')
| -rw-r--r-- | src/bltGrPenOp.C | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/bltGrPenOp.C b/src/bltGrPenOp.C index a1f9f19..bac6f04 100644 --- a/src/bltGrPenOp.C +++ b/src/bltGrPenOp.C @@ -90,12 +90,10 @@ static Tcl_Obj* PenGetProc(ClientData clientData, Tk_Window tkwin, { Pen* penPtr = *(Pen**)(widgRec + offset); - if (penPtr == NULL) { + if (penPtr == NULL) return Tcl_NewStringObj("", -1); - } - else { + else return Tcl_NewStringObj(penPtr->name, -1); - } }; //*** |