diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-08-04 11:02:49 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-08-04 11:03:10 +0200 |
commit | 4c1bc8315d8e677e4eeb2760d7a5ab7b7553359b (patch) | |
tree | 1e72d4fefc539c626f045511c12b238ff379533d /lisp/org/ob-core.el | |
parent | f025005e8619ab42b43dad5dd470dbbbcdc75041 (diff) | |
download | emacs-4c1bc8315d8e677e4eeb2760d7a5ab7b7553359b.tar.gz |
Fix up some prefix registration problems in doc strings
* lisp/uniquify.el (uniquify-buffer-name-style):
* lisp/org/ob-core.el (org-src-sha):
* lisp/emacs-lisp/cl-macs.el (cl--optimize):
* lisp/battery.el (battery-update-functions): Avoid triggering the
`register-definition-prefixes' in doc strings (bug#56968).
Diffstat (limited to 'lisp/org/ob-core.el')
-rw-r--r-- | lisp/org/ob-core.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/org/ob-core.el b/lisp/org/ob-core.el index 3d159ed38a9..3b114703cdc 100644 --- a/lisp/org/ob-core.el +++ b/lisp/org/ob-core.el @@ -488,13 +488,13 @@ arguments, imagine you'd like to set the file name output of a latex source block to a sha1 of its contents. We could achieve this with: -(defun org-src-sha () - (let ((elem (org-element-at-point))) - (concat (sha1 (org-element-property :value elem)) \".svg\"))) + (defun org-src-sha () + (let ((elem (org-element-at-point))) + (concat (sha1 (org-element-property :value elem)) \".svg\"))) -(setq org-babel-default-header-args:latex - `((:results . \"file link replace\") - (:file . (lambda () (org-src-sha))))) + (setq org-babel-default-header-args:latex + `((:results . \"file link replace\") + (:file . (lambda () (org-src-sha))))) Because the closure is evaluated with point at the source block, the call to `org-element-at-point' above will always retrieve |