diff options
author | Björn Gustavsson <[email protected]> | 2016-06-27 11:48:03 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2016-06-27 11:49:57 +0200 |
commit | 6931dce17580d097351dd7be09ce7c9ed3f72827 (patch) | |
tree | 2456845e95ed0112c2f08ed8ab6e867686b91d7a /lib/gs/doc/src/examples/ex17.erl | |
parent | dfccd57cb2b69fc3ab01acd0ccbfc894a8403358 (diff) | |
download | otp-6931dce17580d097351dd7be09ce7c9ed3f72827.tar.gz otp-6931dce17580d097351dd7be09ce7c9ed3f72827.tar.bz2 otp-6931dce17580d097351dd7be09ce7c9ed3f72827.zip |
Remove the gs application
The gs application ws deprecated in R15B01.
Diffstat (limited to 'lib/gs/doc/src/examples/ex17.erl')
-rw-r--r-- | lib/gs/doc/src/examples/ex17.erl | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/lib/gs/doc/src/examples/ex17.erl b/lib/gs/doc/src/examples/ex17.erl deleted file mode 100644 index f659b42ae3..0000000000 --- a/lib/gs/doc/src/examples/ex17.erl +++ /dev/null @@ -1,32 +0,0 @@ --module(ex17). --copyright('Copyright (c) 1991-97 Ericsson Telecom AB'). --vsn('$Revision: /main/release/1 $ '). - --export([start/0,init/0]). - -start() -> spawn(ex17, init, []). - -init() -> - WH = [{width,200},{height,300}], - Win = gs:window(gs:start(),[{map,true},{configure,true}, - {title,"Packer Demo"}|WH]), - gs:frame(packer,Win,[{packer_x,[{stretch,1,50},{stretch,2,50}, - {stretch,1,50}]}, - {packer_y,[{fixed,30},{stretch,1}]}]), - gs:button(packer,[{label,{text,"left"}},{pack_xy,{1,1}}]), - gs:button(packer,[{label,{text,"middle"}},{pack_xy,{2,1}}]), - gs:button(packer,[{label,{text,"right"}},{pack_xy,{3,1}}]), - gs:editor(packer,[{pack_xy,{{1,3},2}},{vscroll,true},{hscroll,true}]), - gs:config(packer,WH), % refresh to initial size - loop(). - -loop() -> - receive - {gs,_Id,destroy,_Data,_Arg} -> bye; - {gs,_Id,configure,_Data,[W,H|_]} -> - gs:config(packer,[{width,W},{height,H}]), % repack - loop(); - Other -> - io:format("loop got: ~p~n",[Other]), - loop() - end. |