pegasus/weechat
1
0
Fork 0
mirror of https://github.com/weechat/weechat.git synced 2026-06-30 23:06:38 +02:00
Code Activity

guile: add missing function "hook_process_hashtable" in API

Browse Source
This commit is contained in:
Sebastien Helleu
2012-03-25 18:20:25 +02:00
parent b867c69477
commit 7e1859ad5d
2 changed files with 40 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/plugins/scripts/guile/weechat-guile-api.c
+38
View File
@@ -2422,6 +2422,43 @@ weechat_guile_api_hook_process (SCM command, SCM timeout, SCM function,
API_RETURN_STRING_FREE(result);
}
/*
* weechat_guile_api_hook_process_hashtable: hook a process with options in a
* hashtable
*/
SCM
weechat_guile_api_hook_process_hashtable (SCM command, SCM options, SCM timeout,
SCM function, SCM data)
{
char *result;
SCM return_value;
struct t_hashtable *c_options;
API_FUNC(1, "hook_process_hashtable", API_RETURN_EMPTY);
if (!scm_is_string (command) || !scm_list_p (options)
|| !scm_is_integer (timeout) || !scm_is_string (function)
|| !scm_is_string (data))
API_WRONG_ARGS(API_RETURN_EMPTY);
c_options = weechat_guile_alist_to_hashtable (options,
WEECHAT_SCRIPT_HASHTABLE_DEFAULT_SIZE);
result = script_ptr2str (script_api_hook_process_hashtable (weechat_guile_plugin,
guile_current_script,
scm_i_string_chars (command),
c_options,
scm_to_int (timeout),
&weechat_guile_api_hook_process_cb,
scm_i_string_chars (function),
scm_i_string_chars (data)));
if (c_options)
weechat_hashtable_free (c_options);
API_RETURN_STRING_FREE(result);
}
/*
* weechat_guile_api_hook_connect_cb: callback for connect hooked
*/
@@ -5308,6 +5345,7 @@ weechat_guile_api_module_init (void *data)
API_DEF_FUNC(hook_timer, 5);
API_DEF_FUNC(hook_fd, 6);
API_DEF_FUNC(hook_process, 4);
API_DEF_FUNC(hook_process_hashtable, 5);
API_DEF_FUNC(hook_connect, 8);
API_DEF_FUNC(hook_print, 6);
API_DEF_FUNC(hook_signal, 3);