diff options
| author | N.N. <krzyszcz@users.sourceforge.net> | 2004-02-19 22:23:18 +0000 |
|---|---|---|
| committer | N.N. <krzyszcz@users.sourceforge.net> | 2004-02-19 22:23:18 +0000 |
| commit | d0f6986345970955d6390a6953c35babf587c262 (patch) | |
| tree | b9c55d804a317558da506f9655ff495856ef47d8 /test/toxy/txt.wid | |
| parent | d405128358369b5b7424c086c67345d12edfde7d (diff) | |
many small improvements in toxy, plustot added
svn path=/trunk/externals/miXed/; revision=1321
Diffstat (limited to 'test/toxy/txt.wid')
| -rw-r--r-- | test/toxy/txt.wid | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test/toxy/txt.wid b/test/toxy/txt.wid new file mode 100644 index 0000000..29d7a3e --- /dev/null +++ b/test/toxy/txt.wid @@ -0,0 +1,9 @@ +#> txt text +#. -bg lightgreen -foreground brown -font .(helvetica 12 bold.) -width 40 -height 16 +#. @bang pd .| _cb [string map .(" " ".`.` ".) [.- get "0.0" end]] .`.: +#. @float pd .| _cb [string map .(" " ".`.` ".) [.- get .#1.0 .#1.end]] .`.: +#. @insert .- insert .#2 .#1 +#. @replace .- delete "0.0" end .: .- insert "0.0" .#1 + +#. @store set .#1 [.- get 0.0 end] +#. @restore insert 0.0 .#1 |