diff --git a/org-ql-view.el b/org-ql-view.el
index cba3ad9..e4ac4c5 100644
--- a/org-ql-view.el
+++ b/org-ql-view.el
@@ -544,10 +544,12 @@ dates in the past, and negative for dates in the future."
 (defun org-ql-view-bookmark-make-record ()
   "Return a bookmark record for the current Org QL View buffer."
   (cl-labels ((file-nameize
-               (b-f) (or (buffer-file-name b-f)
-                         (when (buffer-base-buffer b-f)
-                           (buffer-file-name (buffer-base-buffer b-f)))
-                         (user-error "Only file-backed buffers can be bookmarked by Org QL View: %s" b-f))))
+               (b-f) (cl-typecase b-f
+                       (string b-f)
+                       (buffer (or (buffer-file-name b-f)
+                                   (when (buffer-base-buffer b-f)
+                                     (buffer-file-name (buffer-base-buffer b-f)))))
+                       (t (user-error "Only file-backed buffers can be bookmarked by Org QL View: %s" b-f)))))
     (pcase-let* ((plist (org-ql-view--plist (current-buffer)))
                  ((map :buffers-files) plist))
       ;; Replace buffers with their filenames, and signal error if any are not file-backed.