(Emacs/elisp)+org-bookmark/make-bookmark function
This will allow for easy automation when using ytsearch: every pair of results can be wrapped in this expression to generate the videos I want.
This commit is contained in:
@@ -31,6 +31,16 @@
|
||||
|
||||
(defvar org-bookmark/file (expand-file-name (concat org-directory "/bookmarks.org")))
|
||||
|
||||
(defun org-bookmark/make-bookmark (name url)
|
||||
"Insert a properly formatted bookmark into ORG-BOOKMARK/FILE
|
||||
composed of NAME and URL."
|
||||
(with-current-buffer (find-file org-bookmark/file)
|
||||
(org-insert-heading-respect-content)
|
||||
(insert (concat name " :bookmark:"))
|
||||
(org-set-property "url" url)
|
||||
(next-line 2)
|
||||
(org-insert-time-stamp (time-stamp) t)))
|
||||
|
||||
(defun org-bookmark/--get-heading-data ()
|
||||
"In an org-mode buffer, with point on a heading: get the title,
|
||||
tags and url."
|
||||
|
||||
Reference in New Issue
Block a user