diff options
Diffstat (limited to 'tests/panedwindow.test')
-rw-r--r-- | tests/panedwindow.test | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/tests/panedwindow.test b/tests/panedwindow.test index e302b5d..96ddce3 100644 --- a/tests/panedwindow.test +++ b/tests/panedwindow.test @@ -34,7 +34,7 @@ test panedwindow-1.3 {configuration options: -bd (good)} -body { } -result {4 4} test panedwindow-1.4 {configuration options: -bd (bad)} -body { .p configure -bd badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.5 {configuration options: -bg (good)} -body { .p configure -bg #ff0000 list [lindex [.p configure -bg] 4] [.p cget -bg] @@ -52,7 +52,7 @@ test panedwindow-1.7 {configuration options: -borderwidth (good)} -body { } -result {1 1} test panedwindow-1.8 {configuration options: -borderwidth (bad)} -body { .p configure -borderwidth badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.9 {configuration options: -cursor (good)} -body { .p configure -cursor arrow list [lindex [.p configure -cursor] 4] [.p cget -cursor] @@ -70,7 +70,7 @@ test panedwindow-1.11 {configuration options: -handlesize (good)} -body { } -result {20 20} test panedwindow-1.12 {configuration options: -handlesize (bad)} -body { .p configure -handlesize badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.13 {configuration options: -height (good)} -body { .p configure -height 20 list [lindex [.p configure -height] 4] [.p cget -height] @@ -79,7 +79,7 @@ test panedwindow-1.13 {configuration options: -height (good)} -body { } -result {20 20} test panedwindow-1.14 {configuration options: -height (bad)} -body { .p configure -height badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance or "" but got "badValue"} test panedwindow-1.15 {configuration options: -opaqueresize (good)} -body { .p configure -opaqueresize true list [lindex [.p configure -opaqueresize] 4] [.p cget -opaqueresize] @@ -115,7 +115,7 @@ test panedwindow-1.21 {configuration options: -proxyborderwidth (good)} -body { } -result {1.3 1.3} test panedwindow-1.22 {configuration options: -proxyborderwidth (bad)} -body { .p configure -proxyborderwidth badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.23 {configuration options: -proxyrelief (good)} -body { .p configure -proxyrelief groove list [lindex [.p configure -proxyrelief] 4] [.p cget -proxyrelief] @@ -151,7 +151,7 @@ test panedwindow-1.29 {configuration options: -sashpad (good)} -body { } -result {1 1} test panedwindow-1.30 {configuration options: -sashpad (bad)} -body { .p configure -sashpad badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.31 {configuration options: -sashrelief (good)} -body { .p configure -sashrelief groove list [lindex [.p configure -sashrelief] 4] [.p cget -sashrelief] @@ -169,7 +169,7 @@ test panedwindow-1.33 {configuration options: -sashwidth (good)} -body { } -result {10 10} test panedwindow-1.34 {configuration options: -sashwidth (bad)} -body { .p configure -sashwidth badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.35 {configuration options: -showhandle (good)} -body { .p configure -showhandle true list [lindex [.p configure -showhandle] 4] [.p cget -showhandle] @@ -187,7 +187,7 @@ test panedwindow-1.37 {configuration options: -width (good)} -body { } -result {402 402} test panedwindow-1.38 {configuration options: -width (bad)} -body { .p configure -width badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance or "" but got "badValue"} test panedwindow-1.39 {configuration options: -after (good)} -body { .p paneconfigure .b -after .c @@ -218,7 +218,7 @@ test panedwindow-1.43 {configuration options: -height (good)} -body { } -result {10 10} test panedwindow-1.44 {configuration options: -height (bad)} -body { .p paneconfigure .b -height badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance or "" but got "badValue"} test panedwindow-1.45 {configuration options: -hide (good)} -body { .p paneconfigure .b -hide false list [lindex [.p paneconfigure .b -hide] 4] \ @@ -238,7 +238,7 @@ test panedwindow-1.47 {configuration options: -minsize (good)} -body { } -result {10 10} test panedwindow-1.48 {configuration options: -minsize (bad)} -body { .p paneconfigure .b -minsize badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.49 {configuration options: -padx (good)} -body { .p paneconfigure .b -padx 1.3 list [lindex [.p paneconfigure .b -padx] 4] \ @@ -248,7 +248,7 @@ test panedwindow-1.49 {configuration options: -padx (good)} -body { } -result {1 1} test panedwindow-1.50 {configuration options: -padx (bad)} -body { .p paneconfigure .b -padx badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.51 {configuration options: -pady (good)} -body { .p paneconfigure .b -pady 1.3 list [lindex [.p paneconfigure .b -pady] 4] \ @@ -258,7 +258,7 @@ test panedwindow-1.51 {configuration options: -pady (good)} -body { } -result {1 1} test panedwindow-1.52 {configuration options: -pady (bad)} -body { .p paneconfigure .b -pady badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance but got "badValue"} test panedwindow-1.53 {configuration options: -sticky (good)} -body { .p paneconfigure .b -sticky nsew list [lindex [.p paneconfigure .b -sticky] 4] \ @@ -288,7 +288,7 @@ test panedwindow-1.57 {configuration options: -width (good)} -body { } -result {10 10} test panedwindow-1.58 {configuration options: -width (bad)} -body { .p paneconfigure .b -width badValue -} -returnCodes error -result {bad screen distance "badValue"} +} -returnCodes error -result {expected screen distance or "" but got "badValue"} deleteWindows |