Define PERL_NO_GET_CONTEXT in all perl source files

This removes the calls to Perl_get_context() that get automatically
added to XS code for ancient source code compatibility reasons.

The result is about a ~60K size reduction in the binary (based on
comparing two 64-bit stripped irssi binaries compiled
--with-perl-staticlib).

src/perl/common/Channel.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Channel  PACKAGE = Irssi

src/perl/common/Core.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "irssi-version.h"
 #include "core.h"

src/perl/common/Expando.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "expandos.h"
 

src/perl/common/Ignore.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Ignore  PACKAGE = Irssi

src/perl/common/Irssi.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 static int initialized = FALSE;

src/perl/common/Log.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Log  PACKAGE = Irssi

src/perl/common/Masks.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Masks  PACKAGE = Irssi

src/perl/common/Query.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Query  PACKAGE = Irssi

src/perl/common/Rawlog.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Rawlog  PACKAGE = Irssi

src/perl/common/Server.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Server  PACKAGE = Irssi

src/perl/common/Settings.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "misc.h"
 

src/perl/irc/Channel.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Channel	PACKAGE = Irssi::Irc  PREFIX = irc_

src/perl/irc/Client.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Client  PACKAGE = Irssi::Irc

src/perl/irc/Ctcp.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "ctcp.h"
 

src/perl/irc/Dcc.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Dcc  PACKAGE = Irssi::Irc

src/perl/irc/Irc.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 static int initialized = FALSE;

src/perl/irc/Modes.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Modes	PACKAGE = Irssi::Irc

src/perl/irc/Netsplit.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Netsplit	PACKAGE = Irssi::Irc::Server

src/perl/irc/Notifylist.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Notifylist  PACKAGE = Irssi::Irc

src/perl/irc/Query.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::Irc::Query	PACKAGE = Irssi::Irc::Server  PREFIX = irc_

src/perl/irc/Server.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 static GSList *register_hash2list(HV *hv)

src/perl/perl-common.c

@@ -19,6 +19,7 @@
 */
 
 #define NEED_PERL_H
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "modules.h"
 #include "signals.h"

src/perl/perl-core.c

@@ -19,6 +19,7 @@
 */
 
 #define NEED_PERL_H
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "modules.h"
 #include "core.h"

src/perl/perl-signals.c

@@ -19,6 +19,7 @@
 */
 
 #define NEED_PERL_H
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "modules.h"
 #include "signals.h"

src/perl/perl-sources.c

@@ -19,6 +19,7 @@
 */
 
 #define NEED_PERL_H
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 #include "signals.h"
 

src/perl/textui/Statusbar.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 static GHashTable *perl_sbar_defs;

src/perl/textui/TextBuffer.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::TextUI::TextBuffer  PACKAGE = Irssi

src/perl/textui/TextBufferView.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 MODULE = Irssi::TextUI::TextBufferView  PACKAGE = Irssi::TextUI::TextBuffer  PREFIX = textbuffer_

src/perl/textui/TextUI.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 void perl_statusbar_init(void);

src/perl/ui/Formats.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 static int magic_free_text_dest(pTHX_ SV *sv, MAGIC *mg)

src/perl/ui/Themes.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 static void printformat_perl(TEXT_DEST_REC *dest, char *format, char **arglist)

src/perl/ui/UI.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 void perl_themes_init(void);

src/perl/ui/Window.xs

@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT
 #include "module.h"
 
 #include "window-activity.h"