Changeset 2590
- Timestamp:
- 02/21/08 18:50:45 (11 months ago)
- Files:
-
- trunk/projects/bos/web/tags.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/projects/bos/web/tags.lisp
r2499 r2590 7 7 (let ((s (cxml::chained-handler *html-sink*))) 8 8 (cxml::maybe-close-tag s) 9 (map nil (lambda (c) (cxml::write-rune #+sbcl c #+cmu (char-code c)s)) str)))9 (map nil (lambda (c) (cxml::write-rune c s)) str))) 10 10 11 11 (defun language-options-1 (current-language)
