Bladeren bron

ox-texinfo: Prettify adjunct for indentical nodes.

* lisp/ox-texinfo.el (org-texinfo--get-node): Nicer adjunct for
  identical nodes.
Nicolas Goaziou 7 jaren geleden
bovenliggende
commit
c470edba77
1 gewijzigde bestanden met toevoegingen van 1 en 1 verwijderingen
  1. 1 1
      lisp/ox-texinfo.el

+ 1 - 1
lisp/ox-texinfo.el

@@ -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))))