From 11c2c30eafc6ceeecff0bac3e2e231d0a1754919 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Wed, 25 Jun 1997 22:49:01 +0000
Subject: [PATCH] made icons lazy, updated to new Xt spacing (constant in
 container classes) fixed a few edit% bugs

original commit: 1167fa8393f56dfb1ca71435661296cd4657ffd6
---
 collects/mred/edit.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mred/edit.ss b/collects/mred/edit.ss
index 3cf124bb..a8837f04 100644
--- a/collects/mred/edit.ss
+++ b/collects/mred/edit.ss
@@ -606,7 +606,7 @@
 	       (when sucessful?
 		 (check-lock))
 	       (super-after-load-file sucessful?))]
-	    [autowrap-bitmap mred:icon:autowrap-bitmap])
+	    [autowrap-bitmap (mred:icon:get-autowrap-bitmap)])
 	  (sequence
 	    (apply super-init args)
 	    (let ([keymap (get-keymap)])