X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-ruby.el;h=2792b22a2e1be0431f51c1fa4310f131bec667a6;hp=fc11dce7bf8e6b91af932ee4459cc0907a2974f6;hb=9a40faf27d1ddc378072d9a78dae747f44fc757a;hpb=e757e12715c181760f51ce2e53c0d59c4ab8229a

diff --git a/lisp/riece-ruby.el b/lisp/riece-ruby.el
index fc11dce..2792b22 100644
--- a/lisp/riece-ruby.el
+++ b/lisp/riece-ruby.el
@@ -322,9 +322,9 @@ Use `riece-ruby-set-property' to set this variable.")
 
 (defun riece-ruby-exit-handler (name)
   (riece-ruby-inspect name)
-  (let ((data (copy-sequence riece-ruby-data))
-	(length (length data))
-	(index 0))
+  (let* ((data (copy-sequence riece-ruby-data))
+	 (length (length data))
+	 (index 0))
     (while (< index length)
       (if (eq (aref data index) ?\n)
 	  (aset data index " ")))