Date:	Saturday July 1, 2000 @ 2:43
Author:	xyzzy

Update of /home/netrek/cvsroot/Vanilla/ntserv
In directory swashbuckler.fortress.real-time.com:/var/tmp/cvs-serv7807

Modified Files:
	transwarp.c 
Log Message:
When a ship docked on a SB attempted to transwarp, it was not properly
undocked from the base.  This resulted in the SB getting a "hung port" where
it thought it still had the ship docked, even though it was no longer docked. 
This is what caused the infamous SB etemp bug, where a base would gain etemp
even when it shouldn't be.

Fixed the code so a ship that transwarps will undock from the base, stop
bombing, leave orbit, etc.


****************************************

Index: Vanilla/ntserv/transwarp.c
diff -u Vanilla/ntserv/transwarp.c:1.2 Vanilla/ntserv/transwarp.c:1.3
--- Vanilla/ntserv/transwarp.c:1.2	Fri Apr 30 15:18:47 1999
+++ Vanilla/ntserv/transwarp.c	Sat Jul  1 02:43:31 2000
@@ -1,4 +1,4 @@
-/* $Id: transwarp.c,v 1.2 1999/04/30 20:18:47 ahn Exp $
+/* $Id: transwarp.c,v 1.3 2000/07/01 07:43:31 xyzzy Exp $
  * transwarp.c by isae at IASTATE.EDU
  */
 #include "copyright.h"
@@ -84,6 +84,10 @@
       return (0);
    }
    new_warning(UNDEF, "Transwarp initiated, all systems are DOWN meanwhile!", -1);
+
+   /* This will undock the ship and turn off stuff that it might be doing. */
+   set_speed(1);
+
    me->p_flags &= ~(PFPLOCK|PFPLLOCK|PFDOCK);
    me->p_flags |= (PFSHIELD | PFTWARP | PFPLOCK);
    /*