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

Fixing doc bug

Browse Source 
svn: r16006
This commit is contained in:
Jay McCarthy 2009-09-14 18:38:23 +00:00
parent f2a96f200a
commit 9e43c4e7a7
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/xml/plist.ss
View File

@ -126,10 +126,8 @@
(write-xml
(make-document (make-prolog (list (make-p-i #f #f 'xml "version=\"1.0\" encoding=\"UTF-8\""))
(make-document-type 'plist
(if (eq? (system-type) 'macosx)
(make-external-dtd/system
"file://localhost/System/Library/DTDs/PropertyList.dtd")
#f)
(make-external-dtd/system
"http://www.apple.com/DTDs/PropertyList-1.0.dtd")
#f)
empty)
(xexpr->xml `(plist ((version "0.9"))