From f50e30dd5126408ce01db051b4fd8d2fdf3b245a Mon Sep 17 00:00:00 2001
From: Gustavo <33263751+pereiragc@users.noreply.github.com>
Date: Sun, 18 Jul 2021 21:38:19 -0500
Subject: [PATCH] Include `desc` back in `replace-match` statement (#1615)

Following @jcguu95's suggestion on #1602.
---
 org-roam-migrate.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/org-roam-migrate.el b/org-roam-migrate.el
index 951c0eb..02586b2 100644
--- a/org-roam-migrate.el
+++ b/org-roam-migrate.el
@@ -186,7 +186,8 @@ If the property is already set, replace its value."
                                                         :where (= file $s1)
                                                         :and (= level 0)] path))))
             (set-match-data mdata)
-            (replace-match (org-link-make-string (concat "id:" node-id)) nil t)))))))
+            (replace-match (org-link-make-string (concat "id:" node-id)
+                                                 desc) nil t)))))))
 
 (provide 'org-roam-migrate)
 ;;; org-roam-migrate.el ends here