From 879f4fa041cfdefee655eb877f1a91f86a9c62b7 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Fri, 3 Mar 2017 00:56:40 -0800 Subject: New upstream version 5f2 --- crs.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) mode change 100644 => 100755 crs.c (limited to 'crs.c') diff --git a/crs.c b/crs.c old mode 100644 new mode 100755 index a2094f7..12c0223 --- a/crs.c +++ b/crs.c @@ -249,9 +249,10 @@ SCM owidth(arg) { if (UNBNDP(arg)) arg = cur_outp; ASRTER(NIMP(arg) && OPOUTPORTP(arg), arg, ARG1, s_owidth); - if (NIMP(*loc_stdscr)) + if (NIMP(*loc_stdscr)) { if (WINP(arg)) return MAKINUM(WIN(arg)->_maxx+1); else return MAKINUM(COLS); + } return MAKINUM(80); } SCM oheight(arg) -- cgit v1.2.3