diff -r e040ef0c6ce8 -r 61eb35202526 plugins/perl/perl-common.h
--- a/plugins/perl/perl-common.h	Thu Aug 21 23:26:13 2003 +0000
+++ b/plugins/perl/perl-common.h	Thu Aug 21 23:41:52 2003 +0000
@@ -6,6 +6,8 @@
 #include <perl.h>
 #include <glib.h>
 
+#include "value.h"
+
 #define is_hvref(o) \
 	((o) && SvROK(o) && SvRV(o) && (SvTYPE(SvRV(o)) == SVt_PVHV))
 
@@ -18,6 +20,8 @@
 		gaim_perl_callXS(boot_Gaim__##x, cv, mark); \
 	}
 
+SV *newSVGChar(const char *str);
+
 void gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark);
 void gaim_perl_bless_plain(const char *stash, void *object);
 SV *gaim_perl_bless_object(void *object, const char *stash);
@@ -26,4 +30,11 @@
 
 int execute_perl(const char *function, int argc, char **args);
 
+#if 0
+gboolean gaim_perl_value_from_sv(GaimValue *value, SV *sv);
+SV *gaim_perl_sv_from_value(const GaimValue *value);
+#endif
+
+SV *gaim_perl_sv_from_vargs(const GaimValue *value, va_list args);
+
 #endif /* _GAIM_PERL_COMMON_H_ */