runes.asd

neues release
2007-05-26 21:55:57 +00:00
parent f88950238f
commit b0c212b75e
4 changed files with 14 additions and 50 deletions
--- a/runes/utf8.lisp
+++ b/runes/utf8.lisp
@ -29,7 +29,7 @@
 (defun rod-reader (stream subchar arg)
  (runes::rod-string (runes::rod-reader stream subchar arg)))

-(setf cxml-system::*utf8-runes-readtable*
+(setf runes-system:*utf8-runes-readtable*
      (let ((rt (copy-readtable)))
 	(set-dispatch-macro-character #\# #\/ 'rune-reader rt)
 	(set-dispatch-macro-character #\# #\" 'rod-reader rt)