patch for bug found in v1.5.2 of emacs-lisp interface

[layer@franz.com (Kevin Layer)]

This definition in fi/tcplisp.el:

(defun fi:backdoor-is-running-p ()
  (and fi::backdoor-process
       (eq (process-status fi::backdoor-process) 'open)))

should be:

(defun fi:backdoor-is-running-p ()
  (and fi::backdoor-process
       (memq (process-status fi::backdoor-process) '(run open))))

and don't forget to byte-recompile tcplisp.el.

This fixes a bug whereby the output of some commands sent to the
backdoor (M-S-d, for example) never appears in the minibuffer.

The reason for this patch is that some versions of gnu emacs return
'run for the process status on a socket instead of 'open.

Kevin Layer, Franz Inc.         1995 University Avenue, Suite 275
layer@Franz.COM (internet)      Berkeley, CA  94704
uunet!franz!layer (uucp)        Phone: (415) 548-3600; FAX: (415) 548-8253
    [Please Note: effective 9/2/91 our area code changes from 415 to 510]