Changeset 1152d45

Timestamp:

Oct 24, 2006, 12:52:14 AM (18 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

1aa2b1a

Parents:

c0a90c2

Message:

Including owl.h into perlglue.xs to make it easier to add more perl glue.

Files:

• owl.h (modified) (1 diff)
• perlglue.xs (modified) (1 diff)

owl.h

@@ -41 +41 @@
 #define INC_OWL_H
 
+/* Perl and curses don't play nice. */
+#ifndef OWL_PERL
 #include <curses.h>
+#else
+#define WINDOW void
+#endif
+
 #include <sys/param.h>
 #include <EXTERN.h>

perlglue.xs

@@ -8 +8 @@
 #include <XSUB.h>
 
-/* Yeah, we should just include owl.h, but curses and perl don't play nice. */
-extern char *owl_function_command(char *cmd);
-extern void owl_free(void *x);
-extern SV *owl_perlconfig_curmessage2hashref();
-extern int owl_zwrite_create_and_send_from_line(char *, char *);
-extern char *owl_function_ztext_stylestrip(char *);
-extern void g;
-extern int owl_global_get_cols(void*);
+#define OWL_PERL
+#include "owl.h"
+SV *owl_perlconfig_curmessage2hashref(void);
 
 MODULE = owl            PACKAGE = owl