From 5df503070bc5bdd9d78dafc0b84f61db28061bf3 Mon Sep 17 00:00:00 2001 From: Gerard Vermeulen Date: Sat, 8 Jul 2023 10:57:33 +0200 Subject: [PATCH] Comment the search and paren mismatching problems --- README.org | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/README.org b/README.org index 2b9fda3..17dbf59 100644 --- a/README.org +++ b/README.org @@ -2836,13 +2836,15 @@ SCHEDULED: <2023-06-30 Fri> #+name: lst:valid-org-babel-load-languages-entries #+header: :wrap "src emacs-lisp -n :eval never :tangle no" #+begin_src emacs-lisp -n :exports both :results value pp :tangle no +;; "Search failed:" with paren mismatching problems start here, +;; but the problems are not due to this source block. (defun all-org-babel-execute-fns () "Find `ob-LANGUAGE' files in Org defining `org-babel-execute:LANGUAGE'. Return a list of items where the filename is the `car' of each item and the `cdr' of each item lists the `org-babel-execute:LANGUAGE' functions." (let* ((dir (file-name-parent-directory (locate-library "org"))) - (names (directory-files dir t (rx "ob-" (+ print) ".el" eos)))) + (names (directory-files dir t (rx "ob-" (+ print) ".el" eos)))) (cl-loop for name in names for found = (has-org-babel-execute-fn name) when found collect found)))