diff --git a/collects/framework/frame.ss b/collects/framework/frame.ss
index b49a28ea..2936bfab 100644
--- a/collects/framework/frame.ss
+++ b/collects/framework/frame.ss
@@ -737,7 +737,7 @@
 	  (lambda (p v)
 	    (if v 
 		(register-gc-blit)
-		'(unregister-collecting-blit gc-canvas))
+		(unregister-collecting-blit gc-canvas))
 	    (send super-root change-children
 		  (lambda (l)
 		    (if v
@@ -748,7 +748,7 @@
 	 (lambda ()
 	   (super-on-close)
 	   (send time-canvas set-editor #f)
-	   '(unregister-collecting-blit gc-canvas)
+	   (unregister-collecting-blit gc-canvas)
 	   (close-panel-callback))])
       
       (inherit get-editor)
@@ -805,7 +805,7 @@
 		 [offb (icon:get-gc-off-bitmap)])
 	     (when (and (send onb ok?)
 			(send offb ok?))
-	       '(register-collecting-blit gc-canvas 
+	       (register-collecting-blit gc-canvas 
 					 0 0
 					 (send onb get-width)
 					 (send onb get-height)