# HG changeset patch
# User wenzelm
# Date 1373535621 -7200
# Node ID d28d2d89034d46ad15080ed61b61305143e28500
# Parent  bf90a4e842bc35d8e7449d309ea7dced9cf41984
tuned;

diff -r bf90a4e842bc -r d28d2d89034d src/Pure/Concurrent/event_timer.ML
--- a/src/Pure/Concurrent/event_timer.ML	Thu Jul 11 11:37:06 2013 +0200
+++ b/src/Pure/Concurrent/event_timer.ML	Thu Jul 11 11:40:21 2013 +0200
@@ -115,8 +115,8 @@
 fun cancel req =
   Synchronized.change_result state (fn (requests, manager) =>
     let
-      val (cancelled, requests') = del_request req requests;
-    in (cancelled, (requests', manager)) end);
+      val (canceled, requests') = del_request req requests;
+    in (canceled, (requests', manager)) end);
 
 fun shutdown () =
   Synchronized.guarded_access state (fn (requests, manager) =>