แทรก Org-id Link ที่จุดผ่านการเสร็จสิ้นเส้นทางของ Outline

ขณะนี้การแทรกลิงก์ org-id โหมดองค์กรภายในฉันไปที่ส่วนหัวหรือดึงขึ้นในมุมมองกำหนดการ (การทดสอบการทดสอบส่วนหัวของ RET), จัดเก็บลิงก์ด้วย Cl (org-store-link) กลับไปยังตำแหน่ง ฉันต้องการแทรกลิงค์จากนั้นใส่ลิงค์ด้วย Cc Cl (org-insert-link)

ฉันต้องการแมปคีย์ที่ให้ฉันแทรกลิงค์ที่จุดปัจจุบันโดยใช้การเติมเต็มของแท็บที่คล้ายกับ org-refile (Cc Cw) แทน ผลลัพธ์ที่ตั้งใจไว้จะเป็นลิงค์ภายใน org-id ในรูปแบบ:

[[id:d7534b2f-c221-4dea-8566-d5ce3e4e1b78][Example Link]]

เมื่อมองผ่าน org-id.el ดูเหมือนว่า org-id-get-with-outline-path-complete ถูกออกแบบมาเพื่อจุดประสงค์นี้ ฉันเหนื่อย:

(global-set-key "\C-ci" (lambda () (interactive) (org-id-get-with-outline-path-completion)))

แต่มันไม่ทำงานตามที่ตั้งใจไว้

ฉันมีสิ่งต่อไปนี้ในไฟล์ init.el ของฉัน:

;; Use global IDs
(require 'org-id)
(setq org-id-link-to-org-use-id t)

;; Update ID file .org-id-locations on startup
(org-id-update-id-locations)

;; Refile options
(setq org-refile-targets (quote ((nil :maxlevel . 9) (org-agenda-files :maxlevel . 9))))
(setq org-refile-use-outline-path 'file)
(setq org-outline-path-complete-in-steps t)
(setq org-refile-allow-creating-parent-nodes t)

ฉันแหย่ไปรอบ ๆ ในแหล่งที่มาของโหมด org และพบคุณลักษณะที่มีเอกสารน้อยที่สุด หากคุณกำหนดฟังก์ชั่นก็จะถูกนำมาใช้เพื่อให้เสร็จสิ้นสำหรับการเชื่อมโยงจากประเภทorg-TYPE-complete-link TYPEดังนั้นเราเพียงแค่ต้องกำหนดฟังก์ชั่นorg-id-complete-linkที่จะทำให้เสร็จสมบูรณ์และส่งคืนลิงก์ (รวมถึงคำนำหน้า "id:")

(defun org-id-complete-link (&optional arg)
  "Create an id: link using completion"
  (concat "id:"
          (org-id-get-with-outline-path-completion)))

แทรกลิงก์ตามปกติ (พร้อมC-c C-l) เลือก "id:" เนื่องจากประเภทและฟังก์ชั่นเสร็จสิ้นจะเริ่มทำงาน

แก้ไข: ในฐานะของorg-modeรุ่น 9.0 เพียงกำหนดฟังก์ชั่นดังกล่าวข้างต้นไม่ทำงาน ( อ้างอิง ) แต่คุณต้องเพิ่มฟังก์ชั่นเสร็จสิ้นการorg-link-parametersใช้

(org-link-set-parameters "id"
                         :complete 'org-id-complete-link)