     (insert (format "| Item | Backlinks | Priority |\n|---|"))
     (dolist (headline headlines)
       (when (cdr headline)           ; do not print backlinks if there are none
-        (insert (format "\n| %s |\n|---|" (db/org--format-link-with-headline (car headline))))
+        (insert (format "\n| %s |\n|---|" (db/org--format-link-from-org-id (car headline))))
         (let ((backlink-lines (-> (mapcar #'(lambda (backlink-id)
-                                              (list (db/org--format-link-with-headline backlink-id)
+                                              (list (db/org--format-link-from-org-id backlink-id)
                                                     (org-entry-get (org-id-find backlink-id 'marker)
                                                                    "PRIORITY")))
                                           (cdr headline))

                                   (db/org-get-location)))
           (list (org-id-get) (org-entry-get nil "CUSTOM_ID")))))

(defun db/org--format-link-with-headline (id)
  "Format ID as an Org mode link [[ID][item headline]].

If the headline of the item pointed to by ID contains any links,
those are replaced by their description before formatting."
  (let ((item-headline (org-entry-get (org-id-find id 'marker) "ITEM")))

    ;; When item-headline contains links, replace them by teir description (when
    ;; available); otherwise use the link part only
    ;; FIXME: this is code duplicated from `db/org-insert-link-to-pom'
    (save-match-data
      (while (string-match org-link-bracket-re item-headline)
        (let ((desc (or (match-string-no-properties 2 item-headline)
                        (match-string-no-properties 1 item-headline))))
          (setq item-headline (concat (substring item-headline 0 (match-beginning 0))
                                      desc
                                      (substring item-headline (match-end 0)))))))

    (org-link-make-string (format "id:%s" id) item-headline)))

(defun db/org-insert-link-to-pom (pom)
  "Insert an Org link to headline at POM.

If headline consists of a link with description, only the
description of that link will be included in the description of
the newly inserted link instead of the complete headline.  This
avoids containing a link in the description of the newly inserted
link."
  (let (item id)
    (org-with-point-at pom
      (setq item (org-entry-get (point) "ITEM")

                             desc
                             (substring item (match-end 0)))))))

    (org-link-make-string (format "id:%s" id) item)))

(defun db/org--format-link-from-org-id (id)
  "Format ID as an Org mode link [[ID][item-headline]].

If the headline of the item pointed to by ID contains any links,
those are replaced by their description before formatting."
  (db/org--format-link-from-pom (org-id-find id 'marker)))

(defun db/org-insert-link-to-pom (pom)
  "Insert an Org link to headline at POM.

If headline consists of a link with description, only the
description of that link will be included in the description of
the newly inserted link instead of the complete headline.  This
avoids containing a link in the description of the newly inserted
link."
  (insert (db/org--format-link-from-pom pom)))

(defun db/org-add-link-to-other-item (arg)
  "Interactively query for item and add link to it at point.
