mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 18:00:49 +00:00
Code Releases Activity

ox-texinfo: Prettify adjunct for indentical nodes.

Browse source 
* lisp/ox-texinfo.el (org-texinfo--get-node): Nicer adjunct for
  identical nodes.
This commit is contained in:
Nicolas Goaziou 2017-11-03 11:35:53 +01:00
parent f9c09b194f
commit c470edba77
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/ox-texinfo.el
View file

@ -481,7 +481,7 @@ anchor name is unique."
(name basename))
;; Ensure NAME is unique and not reserved node name "Top".
(while (or (equal name "Top") (rassoc name cache))
(setq name (concat basename (format " %d" (cl-incf salt)))))
(setq name (concat basename (format " (%d)" (cl-incf salt)))))
(plist-put info :texinfo-node-cache (cons (cons datum name) cache))
name))))