diff options
| author |   Michael Cummings <mcummings@gentoo.org> | 2005-03-06 12:07:14 +0000 |
|---|---|---|
| committer | Michael Cummings <mcummings@gentoo.org> | 2005-03-06 12:07:14 +0000 |
| commit | 1bfbbe5c4cc5c426535f139fcc320acf65b13ae6 (patch) | |
| tree | 8b6eb89d70423623765b42aa8705bfc34812d3ea /dev-perl/Curses/files | |
| parent | Marked stable on amd64. (diff) | |
| download | gentoo-2-1bfbbe5c4cc5c426535f139fcc320acf65b13ae6.tar.gz gentoo-2-1bfbbe5c4cc5c426535f139fcc320acf65b13ae6.tar.bz2 gentoo-2-1bfbbe5c4cc5c426535f139fcc320acf65b13ae6.zip | |
New version of curses, dep for POE, still cant get FORMS working
(Portage version: 2.0.51-r13)
Diffstat (limited to 'dev-perl/Curses/files')
| -rw-r--r-- | dev-perl/Curses/files/Curses-1.08-p5.8-fixes.diff | 32 | ||||
| -rw-r--r-- | dev-perl/Curses/files/digest-Curses-1.08 | 1 |
2 files changed, 33 insertions, 0 deletions
diff --git a/dev-perl/Curses/files/Curses-1.08-p5.8-fixes.diff b/dev-perl/Curses/files/Curses-1.08-p5.8-fixes.diff new file mode 100644 index 000000000000..d52d6a0c8b56 --- /dev/null +++ b/dev-perl/Curses/files/Curses-1.08-p5.8-fixes.diff @@ -0,0 +1,32 @@ +diff -Naurp Curses-1.08/CursesFun.c.old Curses-1.08/CursesFun.c +--- Curses-1.08/CursesFun.c.old 2005-03-05 09:15:20.714006864 -0500 ++++ Curses-1.08/CursesFun.c 2005-03-05 09:16:14.501829872 -0500 +@@ -1276,8 +1276,8 @@ XS(XS_Curses_newterm) + c_exactargs("newterm", items, 3); + { + char * type = ST(0) != &PL_sv_undef ? (char *)SvPV(ST(0),PL_na) : NULL; +- FILE * outfd = IoIFP(sv_2io(ST(1))); +- FILE * infd = IoIFP(sv_2io(ST(2))); ++ FILE * outfd = PerlIO_findFILE(IoIFP(sv_2io(ST(1)))); ++ FILE * infd = PerlIO_findFILE(IoIFP(sv_2io(ST(2)))); + SCREEN * ret = newterm(type, outfd, infd); + + ST(0) = sv_newmortal(); +@@ -3450,7 +3450,7 @@ XS(XS_Curses_putwin) + c_exactargs("putwin", items, 2); + { + WINDOW *win = c_sv2window(ST(0), 0); +- FILE * filep = IoIFP(sv_2io(ST(1))); ++ FILE * filep = PerlIO_findFILE(IoIFP(sv_2io(ST(1)))); + int ret = putwin(win, filep); + + ST(0) = sv_newmortal(); +@@ -3469,7 +3469,7 @@ XS(XS_Curses_getwin) + #ifdef C_GETWIN + c_exactargs("getwin", items, 1); + { +- FILE * filep = IoIFP(sv_2io(ST(0))); ++ FILE * filep = PerlIO_findFILE(IoIFP(sv_2io(ST(0)))); + WINDOW * ret = getwin(filep); + + ST(0) = sv_newmortal(); diff --git a/dev-perl/Curses/files/digest-Curses-1.08 b/dev-perl/Curses/files/digest-Curses-1.08 new file mode 100644 index 000000000000..800c1f67863c --- /dev/null +++ b/dev-perl/Curses/files/digest-Curses-1.08 @@ -0,0 +1 @@ +MD5 b468da1602da4399cd03f985672beb72 Curses-1.08b.tgz 77719 |