original commit: d3b3d2dad85977a5e13ec44638fc159cac6dc473
This commit is contained in:
Matthew Flatt 1999-05-21 12:54:29 +00:00
parent 3ff9c03878
commit 00987908b0

View File

@ -2,7 +2,7 @@
(import mred-interfaces^) (import mred-interfaces^)
(define icon-path (define icon-path
(with-handlers ([void (lambda (x) (collection-path "system"))]) (with-handlers ([void (lambda (x) (collection-path "mzlib"))])
(collection-path "icons"))) (collection-path "icons")))
(define (load-icon name type) (define (load-icon name type)