forgot to darcs the changed string-to-octets fn
Sat Nov 3 14:35:55 PDT 2007 Ties Stuij <ties@stuij.se>
* forgot to darcs the changed string-to-octets fn
diff -rN -u old-armish/src/directives.lisp new-armish/src/directives.lisp
--- old-armish/src/directives.lisp 2014-07-29 03:50:32.000000000 -0700
+++ new-armish/src/directives.lisp 2014-07-29 03:50:32.000000000 -0700
@@ -47,7 +47,7 @@
(defun reform-string (string)
(process-bytes (vector-to-list
- (string-to-octets string :utf-8)) 32))
+ (string-to-octets string *string-encoding*)) 8))
(define-directive string (&rest strings)
(let ((null-terminated (or (member :null-terminated strings)