updated to new require* macros and procedures

original commit: a41947b2f07b9b95a0d9dd1eca5234189c61a01c

collects/mred/edit.ss

@@ -994,7 +994,7 @@
 		   (lambda ()
 		     (let ([frame (get-frame)])
 		       (when frame
-			 ((uq-ivar frame ivar-sym))))))
+			 ((ivar/proc frame ivar-sym))))))
 	      tag))])
 	(public
 	  [set-anchor

collects/mred/keys.ss

@@ -60,7 +60,7 @@
 			 (if (is-a? p wx:frame%)
 			     p
 			     (loop (send p get-parent))))])
-		  ((uq-ivar frame method))
+		  ((ivar/proc frame method))
 		  #t)))])
       (lambda (kmap)
 	(let* ([map (lambda (key func)