diff --git a/tools/hemcom.lisp b/tools/hemcom.lisp
index 2d4fcece75f6d8e810df070f09213fc97473741a..83906664afef37ce26c4967018b488423776bccf 100644
--- a/tools/hemcom.lisp
+++ b/tools/hemcom.lisp
@@ -50,7 +50,7 @@
 (comf "target:code/globals")
 (comf "target:code/struct")
 (comf "target:hemlock/charmacs")
-(comf "target:hemlock/key-event")
+(comf "target:hemlock/key-event" :load t)
 (comf "target:hemlock/struct")
 ;(comf "target:hemlock/struct-ed")
 (comf "target:hemlock/rompsite")