[gnu.emacs.bug] Mod. to webster.el

grunwald@flute.cs.uiuc.edu (03/16/89)

Date: Wed, 15 Mar 89 12:30:59 CST
From: kenny@f (Kevin Kenny)
To: grunwald@f.cs.uiuc.edu
Reply-To: kenny@cs.uiuc.edu
X-No-Matter-Where-You-Go: There you are.
Subject: webster.el

Hey! Neat!

One minor glitch: it appears that, at least on M, the eighth bit is
stripped from the communication with the server somewhere along the
line.  This means that the server's end marker is lost, and the
webster process doesn't terminate until the server times it out (and
doesn't work thereafter, unless the *webster* buffer is killed
manually).

The fix is simple:

*** old.webster.el	Wed Mar 15 12:09:42 1989
--- new.webster.el	Wed Mar 15 12:23:36 1989
***************
*** 50,56 ****
  		      (concat webster-request " " webster-word "\n")))))
  
  (defun webster-filter (proc string)
!   (let ((place (string-match "\200" string)))
      (cond (place
  	   (webster-filter proc (concat (substring string 0 (- place 1))
  					"\n\n"))
--- 50,56 ----
  		      (concat webster-request " " webster-word "\n")))))
  
  (defun webster-filter (proc string)
!   (let ((place (or (string-match "\200" string) (string-match "\0" string))))
      (cond (place
  	   (webster-filter proc (concat (substring string 0 (- place 1))
  					"\n\n"))

Kevin

--
Dirk Grunwald
Univ. of Illinois
grunwald@flute.cs.uiuc.edu