ob: Maintain in-context text properties when listing search hits in minibuffer
* lisp/ob.el (org-babel-src-block-names): Don't strip text properties from search hits (org-babel-result-names): Don't strip text properties from search hits
This commit is contained in:
parent
8e4b9b3a6a
commit
1d1368e142
|
@ -1159,8 +1159,7 @@ org-babel-named-src-block-regexp."
|
|||
(when file (find-file file)) (goto-char (point-min))
|
||||
(let (names)
|
||||
(while (re-search-forward org-babel-src-name-w-name-regexp nil t)
|
||||
(setq names (cons (org-babel-clean-text-properties (match-string 4))
|
||||
names)))
|
||||
(setq names (cons (match-string 4) names)))
|
||||
names)))
|
||||
|
||||
;;;###autoload
|
||||
|
@ -1193,8 +1192,7 @@ buffer or nil if no such result exists."
|
|||
(when file (find-file file)) (goto-char (point-min))
|
||||
(let (names)
|
||||
(while (re-search-forward org-babel-result-w-name-regexp nil t)
|
||||
(setq names (cons (org-babel-clean-text-properties (match-string 4))
|
||||
names)))
|
||||
(setq names (cons (match-string 4) names)))
|
||||
names)))
|
||||
|
||||
;;;###autoload
|
||||
|
|
Loading…
Reference in New Issue