From a43005a7ca039982e39e53ccb4dc1d6fc836ee77 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Mon, 16 Aug 1993 08:04:03 +0000 Subject: [PATCH] Initialize cursor X and Y of a screen matrix to 0, not #F. --- v7/src/edwin/screen.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/v7/src/edwin/screen.scm b/v7/src/edwin/screen.scm index c5e29009b..9f5508e2c 100644 --- a/v7/src/edwin/screen.scm +++ b/v7/src/edwin/screen.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Id: screen.scm,v 1.102 1993/08/13 01:35:02 jawilson Exp $ +;;; $Id: screen.scm,v 1.103 1993/08/16 08:04:03 cph Exp $ ;;; ;;; Copyright (c) 1989-93 Massachusetts Institute of Technology ;;; @@ -275,8 +275,8 @@ (set-matrix-highlight! matrix highlight) (set-matrix-enable! matrix enable) (set-matrix-highlight-enable! matrix highlight-enable)) - (set-matrix-cursor-x! matrix false) - (set-matrix-cursor-y! matrix false) + (set-matrix-cursor-x! matrix 0) + (set-matrix-cursor-y! matrix 0) matrix)) (define (set-screen-size! screen x-size y-size) -- 2.25.1