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

move drscheme and tests/drscheme to drracket and tests/drracket

Browse Source 
original commit: ed1d7f81c922c814b8c0657dd952abf4b9c75cdc
This commit is contained in:
Matthew Flatt 2010-05-09 15:06:25 -06:00
parent bed184b62f
commit a1a63c0e08
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/private/scheme.rkt
View File

@ -1186,7 +1186,7 @@
(values lexeme type paren start end backup-delta mode)))))
(define/override (put-file text sup directory default-name)
(parameterize ([finder:default-extension "ss"]
(parameterize ([finder:default-extension "rkt"]
[finder:default-filters '(["Racket Sources" "*.rkt;*.ss;*.scm"]
["Any" "*.*"])])
;; don't call the surrogate's super, since it sets the default extension