diff options
| author | Dan Gudmundsson <[email protected]> | 2016-09-28 13:08:10 +0200 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2016-09-28 13:08:10 +0200 |
| commit | b271012d04897f788866760c1dea7d51b1b44a4d (patch) | |
| tree | 28ae35fbd9d8d6ba7ef02b5a177fb5d9be8a09b7 /lib/wx/api_gen/wx_gen_erl.erl | |
| parent | ee80c779c3ae7900e183c98f2568d386e03e3b66 (diff) | |
| download | otp-b271012d04897f788866760c1dea7d51b1b44a4d.tar.gz otp-b271012d04897f788866760c1dea7d51b1b44a4d.tar.bz2 otp-b271012d04897f788866760c1dea7d51b1b44a4d.zip | |
wx: Add simple dropfiles support
Added wxDropFiles event
Diffstat (limited to 'lib/wx/api_gen/wx_gen_erl.erl')
| -rw-r--r-- | lib/wx/api_gen/wx_gen_erl.erl | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/lib/wx/api_gen/wx_gen_erl.erl b/lib/wx/api_gen/wx_gen_erl.erl index 794de25002..05dc540a16 100644 --- a/lib/wx/api_gen/wx_gen_erl.erl +++ b/lib/wx/api_gen/wx_gen_erl.erl @@ -801,8 +801,13 @@ doc_arg_type(_, _) -> skip. doc_arg_type2(T) -> doc_arg_type2(T, in). -doc_arg_type2(T=#type{single=Single}, Out) when Single =:= array; Single =:= list -> - "[" ++ doc_arg_type3(T, Out) ++ "]"; +doc_arg_type2(T=#type{single=Single}, Out) -> + case Single of + array -> "[" ++ doc_arg_type3(T, Out) ++ "]"; + list -> "[" ++ doc_arg_type3(T, Out) ++ "]"; + {list, _} -> "[" ++ doc_arg_type3(T, Out) ++ "]"; + true -> doc_arg_type3(T, Out) + end; doc_arg_type2(T, Out) -> doc_arg_type3(T, Out). @@ -1207,7 +1212,7 @@ gen_event_recs() -> w("-type wx() :: #wx{}. %% wx event record ~n",[]), w("%% Here comes the definitions of all event records.~n" "%% they contain the event type and possible some extra information.~n~n",[]), - Events = [build_event_rec(C) || {_,C=#class{event=Evs}} <- get(), Evs =/= false], + Events = [build_event_rec(C) || {_,C=#class{event=Evs}} <- lists:sort(get()), Evs =/= false], EventSubTypes = [Type || {_Rec, Type} <- Events], EventRecs = [Rec || {Rec, _Type} <- Events], w("-type event() :: ~s.~n", |