changeset 22:e7ad3b65a553

fix : filename length for PUT Command Packet.
author shinobu
date Sat, 10 Nov 2007 19:15:07 +0900
parents 7ba615ef1593
children e85a0075d6b1
files redit-client-sm.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/redit-client-sm.el	Sat Nov 10 19:06:46 2007 +0900
+++ b/redit-client-sm.el	Sat Nov 10 19:15:07 2007 +0900
@@ -199,7 +199,7 @@
       (concat
         (redit-pack
           (string-to-number redit-put-command)
-            0 0 0 0 0) (buffer-name)))))
+            0 0 0 0 (string-bytes (encode-coding-string (buffer-name) rep-string-encoding))) (buffer-name)))))
 
 ;; 'get' is obsolete command
 ;; (defun redit-get-command ()