* deferred-insert.el (lyskom-replace-deferred): Försök inte

använda buffertens fönster om den inte syns i något fönster.

* commands1.el (lyskom-insert-deferred-session-info): Hantera att
session-info blir nil. Inte så sannolikt, men det verkar ha hänt
Bellman.

src/ChangeLog

+Thu Aug 29 22:31:04 1996  David Kgedal  <kg@infovav.se>
+
+	* deferred-insert.el (lyskom-replace-deferred): Frsk inte
+ 	anvnda buffertens fnster om den inte syns i ngot fnster.
+
+	* commands1.el (lyskom-insert-deferred-session-info): Hantera att
+ 	session-info blir nil. Inte s sannolikt, men det verkar ha hnt
+ 	Bellman.
+
 Wed Aug 28 11:00:40 1996  David Kgedal  <kg@infovav.se>
 
 	* commands2.el (lyskom-memb-received-1,lyskom-memb-received):

src/Makefile

@@ -25,7 +25,7 @@
 # $Id$
 #
 
-CLIENTVERSION = 0.43.2
+CLIENTVERSION = 0.44-beta
 
 SHELL = /bin/sh
 

src/commands1.el

@@ -1672,11 +1672,13 @@ Uses Protocol A version 9 calls"
     (lyskom-insert (lyskom-format 'total-users total-users))))
 
 (defun lyskom-insert-deferred-session-info (session-info defer-info)
-  (lyskom-replace-deferred defer-info
-			   (lyskom-combine-username
-			    (static-session-info->username session-info)
-			    (static-session-info->ident-user session-info)
-			    (static-session-info->hostname session-info))))
+  (if session-info
+      (lyskom-replace-deferred defer-info
+			       (lyskom-combine-username
+				(static-session-info->username session-info)
+				(static-session-info->ident-user session-info)
+				(static-session-info->hostname session-info)))
+    (lyskom-replace-deferred defer-info "")))
 
 ;;; =====================================================================
 ;;;                 Lista klienter - List clients

src/deferred-insert.el

@@ -141,23 +141,24 @@ The insertion will be at (point)."
   (if lyskom-executing-command
       nil
     (let ((window (get-buffer-window lyskom-buffer)))
-      (if (pos-visible-in-window-p (point-max) window)
-	  nil
-	;; This means that this insertion moved point out of the
-	;; window. The scrolling becomes tricky. One big problem is
-	;; that we can't use lyskom-last-viewed, because it has been
-	;; updated to the new prompt. Until that is solved we make
-	;; sure that we never scroll.
-	;;
-	;; The solution is to save lyskom-last-viewed in the defer-info
-	(save-selected-window
-	  (select-window window)
-	  (lyskom-scroll))
-	;; (move-to-window-line -1)
-	;; (vertical-motion 1)
-	;; (if (not (pos-visible-in-window-p))
-	;;     (forward-char -1))
-	))))
+      (if window
+	  (if (pos-visible-in-window-p (point-max) window)
+	      nil
+	    ;; This means that this insertion moved point out of the
+	    ;; window. The scrolling becomes tricky. One big problem is
+	    ;; that we can't use lyskom-last-viewed, because it has been
+	    ;; updated to the new prompt. Until that is solved we make
+	    ;; sure that we never scroll.
+	    ;;
+	    ;; The solution is to save lyskom-last-viewed in the defer-info
+	    (save-selected-window
+	      (select-window window)
+	      (lyskom-scroll))
+	    ;; (move-to-window-line -1)
+	    ;; (vertical-motion 1)
+	    ;; (if (not (pos-visible-in-window-p))
+	    ;;     (forward-char -1))
+	    )))))
 
 
 (defun lyskom-deferred-insert-conf (conf-stat defer-info)