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

Fixed another bug found with random testing

Browse Source 
svn: r18583
This commit is contained in:
Casey Klein 2010-03-19 14:08:48 +00:00
parent 1c72ed7a20
commit a004964297
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/mred/private/wxme/editor.ss
View File

@ -399,7 +399,8 @@
(send new-list notify-on-change (lambda (which) (style-has-changed which)))) (send new-list notify-on-change (lambda (which) (style-has-changed which))))
(set! s-style-list new-list) (set! s-style-list new-list)
;; create "Standard" if it's not there: ;; create "Standard" if it's not there:
(send s-style-list new-named-style "Standard" (send s-style-list basic-style))) (send s-style-list new-named-style "Standard" (send s-style-list basic-style))
(void))
(define/public (style-has-changed which) (void)) (define/public (style-has-changed which) (void))