diff --git a/collects/mred/private/kernel.ss b/collects/mred/private/kernel.ss
index 25836e11..76ef0dfb 100644
--- a/collects/mred/private/kernel.ss
+++ b/collects/mred/private/kernel.ss
@@ -648,6 +648,7 @@
   (define-function get-the-pen-list)
   (define-function get-the-brush-list)
   (define-function get-the-color-database)
+  (define-function cancel-quit)
   (define-function fill-private-color)
   (define-function flush-display)
   (define-function yield)