view plugins/perl/common/module.h @ 7695:557f72040bdf

[gaim-migrate @ 8340] Committing this now so that I don't accidentally destroy it again. We're going WYSIWYG, folks. This is the beginning of it. Don't bother trying to tell me what doesn't work yet. This is just a sneak-peek. Bold, Italics, and Underline work fairly well. The toggle buttons in the tooltips won't necessarily be accurate yet, and things will get screwed up if you say, start typing, make something bold, then go back to before where you started typing and type there. It'll all be fixed eventually. NOTE: I am not liable for any sexual arousal caused by using this code committer: Tailor Script <[e-mail]>

typedef struct group *Gaim__Group;

#define group perl_group

#include <glib.h>
#ifdef _WIN32
#undef pipe
#endif
#include <EXTERN.h>
#include <perl.h>
#include <XSUB.h>

#undef group

#include "../perl-common.h"

#include "account.h"
#include "connection.h"
#include "conversation.h"
#include "debug.h"
#include "server.h"

typedef GaimAccount *     Gaim__Account;
typedef GaimBuddy *       Gaim__BuddyList__Buddy;
typedef GaimChat *   Gaim__BuddyList__Chat;
typedef GaimGroup *       Gaim__BuddyList__Group;
typedef GaimContact *     Gaim__BuddyList__Contact;
typedef GaimConnection *  Gaim__Connection;
typedef GaimConversation *Gaim__Conversation;
typedef GaimConvChat *        Gaim__Conversation__Chat;
typedef GaimConvIm *          Gaim__Conversation__IM;
typedef GaimConvWindow *      Gaim__ConvWindow;
typedef GaimPlugin *      Gaim__Plugin;

typedef GaimDebugLevel Gaim__DebugLevel;