summaryrefslogtreecommitdiffstats
path: root/crs.c
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-03-03 00:56:40 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-03-03 00:56:40 -0800
commitfd5f104f287427fee885583bc398c137674e6af0 (patch)
tree151d1875fdbbc52fd992f53ee197f7070c5f73d1 /crs.c
parent90889a692076f2c62486607d0354e0fca52364bc (diff)
downloadscm-upstream/5f2.tar.gz
scm-upstream/5f2.zip
New upstream version 5f2upstream/5f2upstream
Diffstat (limited to 'crs.c')
-rwxr-xr-x[-rw-r--r--]crs.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/crs.c b/crs.c
index a2094f7..12c0223 100644..100755
--- 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)