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

fix saving non-text file in Windows

Browse Source 
svn: r694

original commit: ddd2f37dd9c077d2d1f0bac3a59dee2291571f4d
This commit is contained in:
Matthew Flatt 2005-08-28 22:42:21 +00:00
parent 508180d985
commit 2f98d1afe1
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/mred/private/editor.ss
View File

@ -215,7 +215,7 @@
[actual-format (if (memq f-format '(copy same))
(-get-file-format)
f-format)]
[text? (not (memq actual-format '(text text-force-cr)))])
[text? (memq actual-format '(text text-force-cr))])
(and
file
(can-save-file? file f-format)