From: Daiki Ueno Date: Sat, 25 Sep 2004 06:03:54 +0000 (+0000) Subject: Fixed. X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=commitdiff_plain;h=28e700ab029aab78808d24c5b6f4192142cd5498 Fixed. --- diff --git a/lisp/riece-server.el b/lisp/riece-server.el index 30086a5..2bfd51f 100644 --- a/lisp/riece-server.el +++ b/lisp/riece-server.el @@ -105,11 +105,11 @@ the `riece-server-keyword-map' variable." (put 'riece-with-server-buffer 'lisp-indent-function 1) (put 'riece-with-server-buffer 'edebug-form-spec '(form body)) -(defun riece-flush-send-queue (process &optional force) +(defun riece-flush-send-queue (process &optional reset) (with-current-buffer (process-buffer process) (let ((length 0) string) - (if force + (if reset (setq riece-send-size 0)) (while (and riece-send-queue (<= riece-send-size riece-max-send-size))