added a missing import

svn: r18787
This commit is contained in:
Robby Findler 2010-04-11 12:12:22 +00:00
parent 30eef711d7
commit e672c022c9

View File

@ -10,6 +10,7 @@
framework/splash framework/splash
"drsig.ss" "drsig.ss"
"language-object-contract.ss" "language-object-contract.ss"
mrlib/switchable-button
string-constants) string-constants)
(require (for-syntax scheme/base scheme/match)) (require (for-syntax scheme/base scheme/match))
@ -412,21 +413,21 @@
(define tool-bitmap-y tool-bitmap-gap) (define tool-bitmap-y tool-bitmap-gap)
(define tool-bitmap-size 32) (define tool-bitmap-size 32)
;
;
;; ; ;;; ; ;; ; ;;;
; ;;; ;;; ; ; ; ; ;;; ;;; ; ;
; ; ; ; ; ; ; ; ; ; ; ; ;
; ;;; ; ;; ;;;; ;;; ;;; ; ; ; ;
; ; ;; ; ; ; ; ; ; ; ; ; ;
; ; ;;; ; ;; ;;;; ;;; ;;; ; ; ; ; ; ; ;;; ; ;; ;;;; ;;; ;;; ; ; ; ;
; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ;; ; ; ; ; ; ; ; ; ; ;
; ; ; ; ; ; ; ; ; ; ; ; ;; ; ; ; ; ; ; ; ;;;; ;;; ;;;;; ; ;;; ; ;
;;;; ;;; ;;; ;;; ; ;;; ;;; ;;;;; ;;; ; ;;;;; ; ; ; ; ; ; ; ; ; ; ; ; ;
; ; ; ; ; ; ; ; ; ; ; ; ; ;; ; ;
; ;;;; ;;; ;;; ;;; ; ;;; ;;; ;;;;; ;;; ; ;;;;;
; ;
; ;
; ;;;
; ;
;
;;;
;; run-phases : -> void ;; run-phases : -> void
(define (run-phases phase1-extras phase2-extras) (define (run-phases phase1-extras phase2-extras)