mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-25 16:32:51 +00:00
Code Releases Activity

org-string-width: Adapt Emacs commit 0c29f53ab8723

Browse source 
* lisp/org-macs.el (org-string-width): Make sure that default values
of `line-prefix' and `wrap-prefix' do not affect width calculation.

Link: https://git.savannah.gnu.org/cgit/emacs.git/commit/?h=emacs-29&id=0c29f53ab8723dd5a9f31ce8a6e913cc08132e56
This commit is contained in:
Ihor Radchenko 2023-08-01 10:03:47 +03:00
parent f03b839530
commit 884b84f7ad
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/org-macs.el
View file

@ -1116,7 +1116,9 @@ Return width in pixels when PIXELS is non-nil."
result)))
(current-char-property-alias-alist char-property-alias-alist))
(with-current-buffer (get-buffer-create " *Org string width*")
(setq-local display-line-numbers nil)
(setq-local display-line-numbers nil
line-prefix nil
wrap-prefix nil)
(setq-local buffer-invisibility-spec
(if (listp current-invisibility-spec)
(mapcar (lambda (el)