jonathanstowe / TermReadKey

Character mode terminal access for Perl
12 stars 27 forks source link

Win32 term width #32

Open jonathanstowe opened 5 years ago

jonathanstowe commented 5 years ago

Wed Sep 04 03:48:20 2019: Request 130445 was acted upon. Transaction: Ticket created by KUERBIS Queue: TermReadKey Subject: Win32 term width Broken in: (no value) Severity: (no value) Owner: Nobody Requestors: KUERBIS@cpan.org Status: new Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=130445 >

ReadKey.xs - lines 505,506:

if (retheight) *retheight = info.srWindow.Bottom - info.srWindow.Top;

1 Top

2

3

4

5 Bottom

Should this be "Bottom + 1 - Top" instead of "Bottom - Top"?

kuerbis commented 5 years ago

33