diff --git a/module/language/elisp/runtime/function-slot.scm b/module/language/elisp/runtime/function-slot.scm
index 971f763a8..1a953922b 100644
--- a/module/language/elisp/runtime/function-slot.scm
+++ b/module/language/elisp/runtime/function-slot.scm
@@ -82,7 +82,8 @@
                funcall
                throw
                not
-               eval)
+               eval
+               load)
   ;; macros
   #:re-export (prog1
                prog2
diff --git a/module/language/elisp/runtime/subrs.scm b/module/language/elisp/runtime/subrs.scm
index a2a086587..e01261a97 100644
--- a/module/language/elisp/runtime/subrs.scm
+++ b/module/language/elisp/runtime/subrs.scm
@@ -354,3 +354,8 @@
 (built-in-func eval
   (lambda (form)
     (compile form #:from 'elisp #:to 'value)))
+
+(built-in-func load
+  (lambda* (file)
+    (compile-file file #:from 'elisp #:to 'value)
+    #t))