From: ueno Date: Tue, 22 Mar 2005 09:17:02 +0000 (+0000) Subject: Simplified. X-Git-Tag: channel-coding-mergepoint~27 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=88648aa993b96905ee5b5ebe519334536caf80cf;p=elisp%2Friece.git Simplified. --- diff --git a/lisp/rubyserv.rb b/lisp/rubyserv.rb index 027e552..032adfc 100644 --- a/lisp/rubyserv.rb +++ b/lisp/rubyserv.rb @@ -14,7 +14,7 @@ class RubyServ def dispatch(line) case line.chomp when /\AD / - return @buf << unescape($') + @buf << unescape($') when /\A(\S+)\s*/ c = $1 r = $' @@ -86,13 +86,11 @@ class RubyServ end def send_data(d) + d = escape(d) begin - r = [d.length, 998].min # 998 = 1000 - CRLF - (0 ... r).each do |i| - r -= 2 if d[i] =~ /[%\r\n]/ - end - puts("D #{escape(d[0 ... r])}\r\n") - d = d[r .. -1] + len = [d.length, 998].min # 998 = 1000 - "D " + puts("D #{d[0 ... len]}\r\n") + d = d[len .. -1] end until d.empty? end