Revision: 6059 Author: iratqq Date: Sun Nov 15 02:00:52 2009 Log: * scm/lolevel.scm (u8list-pack): - Arg is list. Don't append.
http://code.google.com/p/uim/source/detail?r=6059 Modified: /trunk/scm/lolevel.scm ======================================= --- /trunk/scm/lolevel.scm Thu Nov 12 09:49:21 2009 +++ /trunk/scm/lolevel.scm Sun Nov 15 02:00:52 2009 @@ -46,7 +46,7 @@ ((eq? (car f) 's16) (append (string->u8list (cadr f)) '(0))) ;; XXX ((eq? (car f) 'u8list) - (append (cadr f))) + (cadr f)) (else (uim-notify-fatal (N_ "unknown byte operator"))))) (zip fmt args))))
