diff --git a/src/Fl_cocoa.mm b/src/Fl_cocoa.mm
index cb6d18543..bb7e1e19e 100644
--- a/src/Fl_cocoa.mm
+++ b/src/Fl_cocoa.mm
@@ -579,6 +579,9 @@ static void realloc_timers()
 static void delete_timer(MacTimeout& t)
 {
   if (t.timer) {
+    CFRunLoopRemoveTimer(CFRunLoopGetCurrent(),
+		      t.timer,
+		      kCFRunLoopDefaultMode);
     CFRelease(t.timer);
     memset(&t, 0, sizeof(MacTimeout));
   }