Support url being a cons

2024-01-03 20:33:12 +01:00 · 2024-01-03 20:33:12 +01:00 · b04e676203
parent 4c495efa3a
commit b04e676203
2 changed files with 8 additions and 2 deletions
--- a/gists.org
+++ b/gists.org
@ -814,7 +814,10 @@ Based on an answer at the [[https://emacs.stackexchange.com/a/77480/34645][Emacs
     (denote-keywords-prompt)
     'org
     (denote-subdirectory-prompt))
-    (org-set-property "URL" url))
+
+    (org-set-property "URL" (if (consp url)
+                                (car url)
+                              url)))

  ;;; Elfeed integration

--- a/gists/denote-create-note-url.el
+++ b/gists/denote-create-note-url.el
@ -82,7 +82,10 @@ looking at the <title> tags."
   (denote-keywords-prompt)
   'org
   (denote-subdirectory-prompt))
-  (org-set-property "URL" url))
+
+  (org-set-property "URL" (if (consp url)
+                              (car url)
+                            url)))

 ;;; Elfeed integration