diff --git a/backend/yacswa/data.scm b/backend/yacswa/data.scm
index 62b5002..b264bba 100644
--- a/backend/yacswa/data.scm
+++ b/backend/yacswa/data.scm
@@ -15,7 +15,8 @@
   #:use-module (yacswa git)
 
   #:export (get-by-postal
-            get-by-hr))
+            get-by-hr
+            who-locked?))
 
 ;; Prevent the GC from collecting the associations
 (define-once hr-syms '())
diff --git a/backend/yacswa/routes.scm b/backend/yacswa/routes.scm
index be53f90..85bb458 100644
--- a/backend/yacswa/routes.scm
+++ b/backend/yacswa/routes.scm
@@ -3,6 +3,7 @@
   #:use-module (artanis artanis)
   #:use-module (artanis config)
   #:use-module (ice-9 regex)
+  #:use-module (tk listlogic)
   #:use-module (tk short)
   #:use-module (yacswa data))