diff options
author | Dan Gudmundsson <[email protected]> | 2012-02-21 16:05:37 +0100 |
---|---|---|
committer | Dan Gudmundsson <[email protected]> | 2012-02-22 09:41:06 +0100 |
commit | 217343d158afe60a5a6a15e8b894b6fd62611ad3 (patch) | |
tree | fcc6d24f7fae59e455ffbb0b2931349a63d3c599 /lib/wx/src/gen/wxTextDataObject.erl | |
parent | 2c95eb0c575c95a2cdf3c2eacb562d1a5a8cfe08 (diff) | |
download | otp-217343d158afe60a5a6a15e8b894b6fd62611ad3.tar.gz otp-217343d158afe60a5a6a15e8b894b6fd62611ad3.tar.bz2 otp-217343d158afe60a5a6a15e8b894b6fd62611ad3.zip |
[wx] Fix spec errors
Diffstat (limited to 'lib/wx/src/gen/wxTextDataObject.erl')
-rw-r--r-- | lib/wx/src/gen/wxTextDataObject.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/wx/src/gen/wxTextDataObject.erl b/lib/wx/src/gen/wxTextDataObject.erl index ab4d5378e1..4ffa2de4a7 100644 --- a/lib/wx/src/gen/wxTextDataObject.erl +++ b/lib/wx/src/gen/wxTextDataObject.erl @@ -46,7 +46,7 @@ new() -> %% @doc See <a href="http://www.wxwidgets.org/manuals/stable/wx_wxtextdataobject.html#wxtextdataobjectwxtextdataobject">external documentation</a>. -spec new([Option]) -> wxTextDataObject() when - Option :: {text, string()}. + Option :: {text, unicode:chardata()}. new(Options) when is_list(Options) -> MOpts = fun({text, Text}, Acc) -> Text_UC = unicode:characters_to_binary([Text,0]),[<<1:32/?UI,(byte_size(Text_UC)):32/?UI,(Text_UC)/binary, 0:(((8- ((0+byte_size(Text_UC)) band 16#7)) band 16#7))/unit:8>>|Acc]; @@ -64,7 +64,7 @@ getTextLength(#wx_ref{type=ThisT,ref=ThisRef}) -> <<ThisRef:32/?UI>>). %% @doc See <a href="http://www.wxwidgets.org/manuals/stable/wx_wxtextdataobject.html#wxtextdataobjectgettext">external documentation</a>. --spec getText(This) -> string() when +-spec getText(This) -> unicode:charlist() when This::wxTextDataObject(). getText(#wx_ref{type=ThisT,ref=ThisRef}) -> ?CLASS(ThisT,wxTextDataObject), @@ -73,7 +73,7 @@ getText(#wx_ref{type=ThisT,ref=ThisRef}) -> %% @doc See <a href="http://www.wxwidgets.org/manuals/stable/wx_wxtextdataobject.html#wxtextdataobjectsettext">external documentation</a>. -spec setText(This, Text) -> ok when - This::wxTextDataObject(), Text::string(). + This::wxTextDataObject(), Text::unicode:chardata(). setText(#wx_ref{type=ThisT,ref=ThisRef},Text) when is_list(Text) -> ?CLASS(ThisT,wxTextDataObject), @@ -82,7 +82,7 @@ setText(#wx_ref{type=ThisT,ref=ThisRef},Text) <<ThisRef:32/?UI,(byte_size(Text_UC)):32/?UI,(Text_UC)/binary, 0:(((8- ((0+byte_size(Text_UC)) band 16#7)) band 16#7))/unit:8>>). %% @doc Destroys this object, do not use object again --spec destroy(This::wxTextDataObject) -> ok. +-spec destroy(This::wxTextDataObject()) -> ok. destroy(Obj=#wx_ref{type=Type}) -> ?CLASS(Type,wxTextDataObject), wxe_util:destroy(?wxTextDataObject_destroy,Obj), |