# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 950793147 0
# Node ID 5c49b0be3b7b944d5499620118f2fe669f0ddc3e
# Parent  d6a89b95b32de8ac8a7f55a33f335d088f296894
(stop_other_atimers): Don't call cancel_atimer because
that unblocks alarms.

diff -r d6a89b95b32d -r 5c49b0be3b7b src/atimer.c
--- a/src/atimer.c	Thu Feb 17 12:15:05 2000 +0000
+++ b/src/atimer.c	Thu Feb 17 13:12:27 2000 +0000
@@ -214,11 +214,23 @@
 
   if (t)
     {
-      cancel_atimer (t);
-      if (free_atimers != t)
-	abort ();
-      free_atimers = free_atimers->next;
-      t->next = NULL;
+      struct atimer *p, *prev;
+      
+      /* See if T is active.  */
+      for (p = atimers, prev = 0; p && p != t; p = p->next)
+	;
+
+      if (p == t)
+	{
+	  if (prev)
+	    prev->next = t->next;
+	  else
+	    atimers = t->next;
+	  t->next = NULL;
+	}
+      else
+	/* T is not active.  Let's handle this like T == 0.  */
+	t = NULL;
     }
   
   stopped_atimers = atimers;