From 4f05adcd197c312e9fc4ec2a50c77727482e8a8e Mon Sep 17 00:00:00 2001
From: Asumu Takikawa <asumu@ccs.neu.edu>
Date: Mon, 12 Jan 2015 18:35:52 -0500
Subject: [PATCH] Fix type for make-brush

Related to PR 14899
---
 typed-racket-more/typed/racket/draw.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/typed-racket-more/typed/racket/draw.rkt b/typed-racket-more/typed/racket/draw.rkt
index 082b03f5..f00fe74c 100644
--- a/typed-racket-more/typed/racket/draw.rkt
+++ b/typed-racket-more/typed/racket/draw.rkt
@@ -108,7 +108,7 @@
                                        -Real -Real -Real -Real -Real))
                           #f
          #:immutable? Univ #f
-         (-inst (parse-type #'Bitmap%)))]
+         (-inst (parse-type #'Brush%)))]
  [make-color
   (->optkey -Byte -Byte -Byte
             [-Real]