Fix TestLib::slurp_file() with offset on windows. 3c5b0685b921 used setFilePointer() to set the position of the filehandle, but passed the wrong filehandle, always leaving the position at 0. Instead of just fixing that, remove use of setFilePointer(), we have a perl fd at this point, so we can just use perl's seek().
Additionally, the perl filehandle wasn't closed, just the windows filehandle. Reviewed-By: Andrew Dunstan <and...@dunslane.net> Author: Andres Freund <and...@anarazel.de> Discussion: https://postgr.es/m/20211003173038.64mmhgxctfqn7...@alap3.anarazel.de Backpatch: 9.6-, like 3c5b0685b921 Branch ------ REL_13_STABLE Details ------- https://git.postgresql.org/pg/commitdiff/5ba397f7404e911c7822e85441d42673080c5b98 Modified Files -------------- src/test/perl/TestLib.pm | 36 ++++++++++++++++++------------------ 1 file changed, 18 insertions(+), 18 deletions(-)
