[comp.emacs] Help, problem about TCP and initial screen

jbw@bucsf.bu.edu (Joe Wells) (09/29/90)

In article <12191@crdgw1.crd.ge.com> inoue@sunburst.crd.ge.com writes:

   My scenario is, 
   1. User starts emacs process. As the initial process, the emacs
     starts a server process. (serv-start command is in the .emacs file)
   2. User starts an application.
   3. the application get a string from Standard input by the user.
   4. The application sends the string to the server via a socket.
   5. The server sends the string to the emacs.
   6. emacs handles the string.

   In this scenario, I can do anything, for example, I can let emacs to 
   insert a string to a buffer.

   The problem is, if I do not touch emacs window after starting and let it
   insert a string to a buffer from the application, the string 
   dissapears suddenly when I try to add a character in the emacs window. 
   This must have something to do with emacs
   initial screen. Usually, starting emacs with no arguments causes it
   to display the initial screen saying

      GNU Emacs 18.55.17 of ......
      .....
      Type C-h t for a tutorial on usin Emacs.

   It dissapears when we do something on the window.

You have guessed correctly as to the cause of the problem.

I posted a fix for this a while back, here is a more correct fix:

*** /usr14/gnu/dist-18.55/lisp/startup.el	Fri Apr  7 22:03:10 1989
--- startup.el	Fri Sep 28 22:08:05 1990
***************
*** 193,198 ****
  		   (set-buffer-modified-p nil)
  		   (sit-for 120))
! 	     (erase-buffer)
! 	     (set-buffer-modified-p nil))))
      (let ((dir default-directory)
  	  (line 0))
--- 193,201 ----
  		   (set-buffer-modified-p nil)
  		   (sit-for 120))
! 	       (if (get-buffer "*scratch*")
! 		   (save-excursion
! 		     (set-buffer "*scratch*")
! 		     (erase-buffer)
! 		     (set-buffer-modified-p nil))))))
      (let ((dir default-directory)
  	  (line 0))

Enjoy,

-- 
Joe Wells <jbw@bu.edu>