diff options
author | Sverker Eriksson <[email protected]> | 2017-08-30 21:00:35 +0200 |
---|---|---|
committer | Sverker Eriksson <[email protected]> | 2017-08-30 21:00:35 +0200 |
commit | 44a83c8860bbd00878c720a7b9d940b4630bab8a (patch) | |
tree | 101b3c52ec505a94f56c8f70e078ecb8a2e8c6cd /lib/gs/doc/src/examples/ex8.erl | |
parent | 7c67bbddb53c364086f66260701bc54a61c9659c (diff) | |
parent | 040bdce67f88d833bfb59adae130a4ffb4c180f0 (diff) | |
download | otp-44a83c8860bbd00878c720a7b9d940b4630bab8a.tar.gz otp-44a83c8860bbd00878c720a7b9d940b4630bab8a.tar.bz2 otp-44a83c8860bbd00878c720a7b9d940b4630bab8a.zip |
Merge tag 'OTP-20.0' into sverker/20/binary_to_atom-utf8-crash/ERL-474/OTP-14590
Diffstat (limited to 'lib/gs/doc/src/examples/ex8.erl')
-rw-r--r-- | lib/gs/doc/src/examples/ex8.erl | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/lib/gs/doc/src/examples/ex8.erl b/lib/gs/doc/src/examples/ex8.erl deleted file mode 100644 index 3081cb6114..0000000000 --- a/lib/gs/doc/src/examples/ex8.erl +++ /dev/null @@ -1,22 +0,0 @@ --module(ex8). --copyright('Copyright (c) 1991-97 Ericsson Telecom AB'). --vsn('$Revision: /main/release/2 $ '). - --export([start/0]). - -start() -> - gs:window(win,gs:start(),{map,true}), - gs:radiobutton(rb1,win,[{label,{text,"rb1"}},{value,a},{y,0}]), - gs:radiobutton(rb2,win,[{label,{text,"rb2"}},{value,a},{y,30}]), - gs:radiobutton(rb3,win,[{label,{text,"rb3"}},{value,b},{y,60}]), - rb_loop(). - -rb_loop() -> - receive - {gs,Any_Rb,click,Data,[Text, Grp, a | Rest]} -> - io:format("either rb1 or rb2 is on.~n",[]), - rb_loop(); - {gs,rb3,click,Data,[Text, Grp, b | Rest]} -> - io:format("rb3 is selected.~n",[]), - rb_loop() - end. |