mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-30 02:10:03 +00:00
Fix last commit
This commit is contained in:
parent
ed048fa83d
commit
73c0989037
|
@ -500,7 +500,8 @@ by `org-babel-get-src-block-info'."
|
||||||
(let ((link-data (pcase (or info (org-babel-get-src-block-info 'light))
|
(let ((link-data (pcase (or info (org-babel-get-src-block-info 'light))
|
||||||
(`(,_ ,_ ,_ ,_ ,name ,start ,_)
|
(`(,_ ,_ ,_ ,_ ,name ,start ,_)
|
||||||
`(("start-line" . ,(org-with-point-at start
|
`(("start-line" . ,(org-with-point-at start
|
||||||
(line-beginning-position)))
|
(number-to-string
|
||||||
|
(line-number-at-pos))))
|
||||||
("file" . ,(buffer-file-name))
|
("file" . ,(buffer-file-name))
|
||||||
("link" . ,(org-no-properties (org-store-link nil)))
|
("link" . ,(org-no-properties (org-store-link nil)))
|
||||||
("source-name" . ,name))))))
|
("source-name" . ,name))))))
|
||||||
|
|
Loading…
Reference in a new issue