diff options
| author | Alexey Shchepin <alexey@process-one.net> | 2004-12-01 22:48:53 +0000 |
|---|---|---|
| committer | Alexey Shchepin <alexey@process-one.net> | 2004-12-01 22:48:53 +0000 |
| commit | fb977729a94e99b24139a946edd566d80ae37a19 (patch) | |
| tree | 10a49176d34b123232979a8fe1356e6a950757ea /src/stringprep | |
| parent | * src/mod_vcard.erl: Added missed index (diff) | |
* src/expat_erl.c: Now uses port control instead of port output
* src/xml_stream.erl: Likewise
* src/stringprep/stringprep.erl: Now register port instead of
storing it in ets table
* doc/guide.tex: Updated URLs to R10C release
SVN Revision: 287
Diffstat (limited to 'src/stringprep')
| -rw-r--r-- | src/stringprep/stringprep.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/stringprep/stringprep.erl b/src/stringprep/stringprep.erl index 58360b29..ac06a096 100644 --- a/src/stringprep/stringprep.erl +++ b/src/stringprep/stringprep.erl @@ -26,6 +26,8 @@ code_change/3, terminate/2]). +-define(STRINGPREP_PORT, stringprep_port). + -define(NAMEPREP_COMMAND, 1). -define(NODEPREP_COMMAND, 2). -define(RESOURCEPREP_COMMAND, 3). @@ -39,8 +41,7 @@ start_link() -> init([]) -> ok = erl_ddll:load_driver(ejabberd:get_so_path(), stringprep_drv), Port = open_port({spawn, stringprep_drv}, []), - ets:new(stringprep_table, [set, public, named_table]), - ets:insert(stringprep_table, {port, Port}), + register(?STRINGPREP_PORT, Port), {ok, Port}. @@ -84,8 +85,7 @@ resourceprep(String) -> control(?RESOURCEPREP_COMMAND, String). control(Command, String) -> - [{port, Port} | _] = ets:lookup(stringprep_table, port), - case port_control(Port, Command, String) of + case port_control(?STRINGPREP_PORT, Command, String) of [0 | _] -> error; [1 | Res] -> Res end. |