diff --git a/lisp/org-process.el b/lisp/org-process.el
index e4b87a7..2c78e5a 100644
--- a/lisp/org-process.el
+++ b/lisp/org-process.el
@@ -161,6 +161,7 @@
            (setf (alist-get category db)
                  (point-marker))
            nil)
+       (recenter)
        (let* ((category-name (ivy-completing-read "Category? " (sort (mapcar #'car db) #'ivy-string<)))
               (category (intern category-name))
               (entry (assoc category db)))