diff options
author | Mathieu Arnold <mat@FreeBSD.org> | 2013-11-14 15:52:01 +0000 |
---|---|---|
committer | Mathieu Arnold <mat@FreeBSD.org> | 2013-11-14 15:52:01 +0000 |
commit | 92133aad6fb9d554d587fbcd75fa8c5b88da8459 (patch) | |
tree | 56afedecbf4f29847f5fe3a08689625df97e20f8 /editors | |
parent | a4625901b247df3f9c740f36b851e976925d0b15 (diff) | |
download | ports-92133aad6fb9d554d587fbcd75fa8c5b88da8459.tar.gz ports-92133aad6fb9d554d587fbcd75fa8c5b88da8459.zip |
Notes
Diffstat (limited to 'editors')
-rw-r--r-- | editors/led/files/patch-src__modules__perlapi__perlapi.c | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/editors/led/files/patch-src__modules__perlapi__perlapi.c b/editors/led/files/patch-src__modules__perlapi__perlapi.c new file mode 100644 index 000000000000..0804d6393d73 --- /dev/null +++ b/editors/led/files/patch-src__modules__perlapi__perlapi.c @@ -0,0 +1,26 @@ +--- ./src/modules/perlapi/perlapi.c.orig 2002-02-14 22:07:31.000000000 +0100 ++++ ./src/modules/perlapi/perlapi.c 2013-11-14 16:41:36.000000000 +0100 +@@ -36,6 +36,7 @@ + /* extension module support */ + static void xs_init() { + char *file = __FILE__; ++ dTHX; + + newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file); + newXS("Led::bootstrap", boot_Led, file); +@@ -66,6 +67,7 @@ + char *args[] = { "", "-e", "" }; + char *bootargs[] = { "Led", 0 }; + u_char *expath; ++ dTHX; + + /* add perl commands to the editor */ + command_addf("perl_eval", input_allocsyms(1), perlapi_doeval); +@@ -124,6 +126,7 @@ + /* evaluate some perl */ + void perlapi_eval(u_char *string) { + SV *sv; ++ dTHX; + + sv = newSVpv(string, 0); + perl_eval_sv(sv, G_DISCARD | G_NOARGS); |