Skip Menu |
 

This queue is for tickets about the TermReadKey CPAN distribution.

Report information
The Basics
Id: 120148
Status: new
Priority: 0/
Queue: TermReadKey

People
Owner: Nobody in particular
Requestors: johan.laenen [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Term::Prompt messes with $\ because of the lastest change 2.34 in Term::Readkey
Date: Wed, 8 Feb 2017 21:02:20 +0100
To: bug-TermReadKey [...] rt.cpan.org
From: Johan Laenen <johan.laenen [...] gmail.com>
Download (untitled) / with headers
text/plain 818b
Hi, The following oneliner gives two lines of output instead of the three I expect to see: perl -e 'use Text::Wrap; use Term::Prompt qw/prompt/; my $p = prompt("y", "", "", ""); { local $\="\n"; print "the quick brown fox" } {local $\="\n"; print "jumps over the lazy dog." };' yields: (y or n) [default n] the quick brown foxjumps over the lazy dog. I expected: (y or n) [default n] the quick brown fox jumps over the lazy dog. Now, this is on debian strech/sid, perl v5.24.1, Term::Readkey 2.37 and Term::Prompt 1.04. If I downgrade Term::Readkey to 2.33 the code above works as expected. 2.34 "Fix GetTerminalSize() argument handling". 2.33 is accidentally *ignoring* the argument and using \*STDOUT. 2.34 is working right... which causes it to get far enough to break something. Greetings, Johan Laenen


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.