src/Pure/Concurrent/event_timer.ML
changeset 52589 d28d2d89034d
parent 52537 4b5941730bd8
child 52798 9d3c9862d1dd
--- 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) =>