Fixed.
authorDaiki Ueno <ueno@unixuser.org>
Thu, 11 Aug 2005 07:39:20 +0000 (07:39 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Thu, 11 Aug 2005 07:39:20 +0000 (07:39 +0000)
lisp/riece-ruby.el

index 2792b22..c7c5d82 100644 (file)
@@ -327,7 +327,8 @@ Use `riece-ruby-set-property' to set this variable.")
         (index 0))
     (while (< index length)
       (if (eq (aref data index) ?\n)
         (index 0))
     (while (< index length)
       (if (eq (aref data index) ?\n)
-         (aset data index " ")))
+         (aset data index " "))
+      (setq index (1+ index)))
     (riece-send-string
      (format "NOTICE %s :%s\r\n"
             (riece-identity-prefix
     (riece-send-string
      (format "NOTICE %s :%s\r\n"
             (riece-identity-prefix