runes.asd

neues release
2007-05-26 21:55:58 +00:00
parent b6551d34b4
commit b07409f2c2
1 changed files with 1 additions and 1 deletions
--- a/utf8.lisp
+++ b/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)