Update buffer name
This commit is contained in:
parent
5a3f150fcb
commit
ec84f20d4c
1 changed files with 2 additions and 2 deletions
|
@ -540,10 +540,10 @@
|
|||
"Extract headlines and their content from current buffer by TAG."
|
||||
(interactive "sEnter tag: ")
|
||||
(save-excursion
|
||||
(let ((result-buffer (generate-new-buffer "*Extracted Headlines*")))
|
||||
(let ((result-buffer (generate-new-buffer (concat "*Extracted Headlines " tag "*"))))
|
||||
(with-current-buffer result-buffer
|
||||
(org-mode)
|
||||
(insert "* Extracted Headlines by Tag: " tag " *\n"))
|
||||
(insert "* Extracted Headlines by Tag: " tag " *\n\n"))
|
||||
(org-element-map (org-element-parse-buffer) 'headline
|
||||
(lambda (headline)
|
||||
(when (member tag (org-element-property :tags headline))
|
||||
|
|
Loading…
Add table
Reference in a new issue