diff --git a/modules/org/org/autoload/org-link.el b/modules/org/org/autoload/org-link.el
new file mode 100644
index 000000000..8d55ef8d0
--- /dev/null
+++ b/modules/org/org/autoload/org-link.el
@@ -0,0 +1,15 @@
+;;; org/org/autoload/org-link.el -*- lexical-binding: t; -*-
+
+;;;###autoload
+(defun +org-link-read-file (key dir)
+  (let ((file (read-file-name (format "%s: " (capitalize key)) dir)))
+    (format "%s:%s"
+            key
+            (file-relative-name file dir))))
+
+;;;###autoload
+(defun +org-link-read-directory (key dir)
+  (let ((file (read-directory-name (format "%s: " (capitalize key)) dir)))
+    (format "%s:%s"
+            key
+            (file-relative-name file dir))))