suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fixed bug so that number snips can be loaded outside of drscheme

Browse Source 
svn: r1075
This commit is contained in:
Robby Findler 2005-10-13 21:55:14 +00:00
parent 2d484520b2
commit 988dfce4ae
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
collects/framework/private/number-snip.ss
View File

@ -55,9 +55,14 @@
snip))
(super-new)))
(define old-number-snipclass (new -snip-class%))
(send old-number-snipclass set-version 3)
(send old-number-snipclass set-classname "drscheme:number")
(send (get-the-snip-class-list) add old-number-snipclass)
(define number-snipclass (new -snip-class%))
(send number-snipclass set-version 3)
(send number-snipclass set-classname "drscheme:number")
(send number-snipclass set-version 1)
(send number-snipclass set-classname (format "~s" '(lib "number-snip.ss" "drscheme" "private")))
(send (get-the-snip-class-list) add number-snipclass)
(define arrow-cursor (make-object cursor% 'arrow))