From a1b5ba2270fa97d6dad3acfe3135d11e274a8f02 Mon Sep 17 00:00:00 2001
From: Ben Harris <bjh21@bjh21.me.uk>
Date: Sun, 24 Nov 2002 00:38:44 +0000
Subject: [PATCH] Fix scrolling on systems without Color QuickDraw.  It seems
 that the current background colour and pen mode have some silly effects on
 ScrollRect, so set them back to their defaults before calling it.

[originally from svn r2254]
---
 mac/macterm.c | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/mac/macterm.c b/mac/macterm.c
index 229a9083..0ddb789c 100644
--- a/mac/macterm.c
+++ b/mac/macterm.c
@@ -1,4 +1,4 @@
-/* $Id: macterm.c,v 1.10 2002/11/23 22:36:56 ben Exp $ */
+/* $Id: macterm.c,v 1.11 2002/11/24 00:38:44 ben Exp $ */
 /*
  * Copyright (c) 1999 Simon Tatham
  * Copyright (c) 1999, 2002 Ben Harris
@@ -1273,10 +1273,9 @@ void do_scroll(void *frontend, int topline, int botline, int lines) {
 
     /* FIXME: This is seriously broken on Original QuickDraw.  No idea why. */
     SetPort(s->window);
+    PenNormal();
     if (HAVE_COLOR_QD())
 	PmBackColor(DEFAULT_BG);
-    else
-	BackColor(blackColor);
     update = NewRgn();
     SetRect(&r, 0, topline * s->font_height,
 	    s->term->cols * s->font_width, (botline + 1) * s->font_height);