From 01064e7ab418e55ae36e65368573796e40285c3c Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Fri, 11 Aug 2000 02:52:09 +0000
Subject: [PATCH] ..

original commit: cb392265f95b7a3af4e44409df5defb819017e05
---
 collects/framework/frame.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/framework/frame.ss b/collects/framework/frame.ss
index c7659690..2dd271d2 100644
--- a/collects/framework/frame.ss
+++ b/collects/framework/frame.ss
@@ -656,7 +656,7 @@
 	 (lambda (item control)
 	   (let* ([b (box #f)]
 		  [edit (get-editor)]
-		  [filename (get-filename b)])
+		  [filename (send edit get-filename b)])
 	     (if (or (not filename) (unbox b))
 		 (bell)
 		 (let ([start