Mercurial > pidgin
view libpurple/plugins/perl/common/Sound.xs @ 21252:d275275a011c
Missing changelog entries and @since tags from 3f567df17490f68b4feb8cf26ad004a34eb7cc9a.
author | Sadrul Habib Chowdhury <imadil@gmail.com> |
---|---|
date | Tue, 16 Oct 2007 11:05:59 +0000 |
parents | 39c7bb133a9f |
children | 907f5f41e32a |
line wrap: on
line source
#include "module.h" MODULE = Purple::Sound PACKAGE = Purple::Sound PREFIX = purple_sound_ PROTOTYPES: ENABLE BOOT: { HV *stash = gv_stashpv("Purple::SoundEventID", 1); static const constiv *civ, const_iv[] = { #define const_iv(name) {#name, (IV)PURPLE_SOUND_##name} const_iv(BUDDY_ARRIVE), const_iv(BUDDY_LEAVE), const_iv(RECEIVE), const_iv(FIRST_RECEIVE), const_iv(SEND), const_iv(CHAT_JOIN), const_iv(CHAT_LEAVE), const_iv(CHAT_YOU_SAY), const_iv(CHAT_SAY), const_iv(POUNCE_DEFAULT), const_iv(CHAT_NICK), }; for (civ = const_iv + sizeof(const_iv) / sizeof(const_iv[0]); civ-- > const_iv; ) newCONSTSUB(stash, (char *)civ->name, newSViv(civ->iv)); } Purple::Sound::UiOps purple_sound_get_ui_ops() void purple_sound_init() void purple_sound_play_event(event, account) Purple::SoundEventID event Purple::Account account void purple_sound_play_file(filename, account) const char *filename Purple::Account account void purple_sound_set_ui_ops(ops) Purple::Sound::UiOps ops void purple_sound_uninit()