[oni-core] Fix related files function

oni-core.el

@@ -4,7 +4,7 @@
 
 ;; Author: Tom Willemse <tom@ryuslash.org>
 ;; Keywords: local
-;; Version: 2023.0227.150230
+;; Version: 2023.0329.172412
 ;; Package-Requires: (oni-data-dir oni-embrace oni-hydra expand-region multiple-cursors gcmh diminish ws-butler which-key insert-char-preview mixed-pitch ace-window vertico marginalia orderless consult embark docstr)
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -418,7 +418,7 @@ _s_: String list"
           ((not current-place)
            (user-error "Related-Files only works from file-based buffers"))
           (t
-           (related-files--collect-existing-places jumpers current-place)))))
+           (related-files--collect-existing-places jumpers (list current-place))))))
 
 (defvar oni-core-related-places-source
   '(:name "Related File"

oni-org-roam.el

@@ -4,7 +4,7 @@
 
 ;; Author: Tom Willemse <tom@ryuslash.org>
 ;; Keywords: local
-;; Version: 2023.0325.231122
+;; Version: 2023.0330.183039
 ;; Package-Requires: (oni-org org-roam)
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -84,7 +84,8 @@
         (mapc (lambda (item) (insert "- [["(cadr item) "]["
                                      (caddr item) "]]\n"))
               (oni-org-roam--books-to-read))
-        (org-mode)))
+        (org-mode)
+        (view-mode)))
     (switch-to-buffer buffer)))
 
 (defun oni-org-roam-random-book-to-read ()
@@ -116,6 +117,11 @@
       (concat "${title:*} "
               (propertize "${tags:10}" 'face 'org-tag)))
 
+;; Only display unique references in the org-roam buffer.
+(setq org-roam-mode-sections
+      (cons '(org-roam-backlinks-section :unique t)
+            (delete 'org-roam-backlinks-section org-roam-mode-sections)))
+
 (org-roam-db-autosync-mode)
 
 (provide 'oni-org-roam)

oni-org/oni-org.el

@@ -4,7 +4,7 @@
 
 ;; Author: Tom Willemse <tom@ryuslash.org>
 ;; Keywords: local
-;; Version: 2023.0325.213834
+;; Version: 2023.0329.163548
 ;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org org-contrib org-bullets org-edna diminish all-the-icons olivetti form-feed)
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -796,7 +796,7 @@ After running it once remove it from `org-capture-after-finalize-hook'."
                            (oni-org-todo-main-file . (:maxlevel . 10))
                            (oni-org-todo-someday-file . (:maxlevel . 1))))
 
-(define-key org-mode-map (kbd "C-c C-S-w") #'oni-org-refile-to-top 'remove)
+(define-key org-mode-map (kbd "C-c C-S-w") #'oni-org-refile-to-top)
 
 ;;; Export
 (require 'ox-html)