0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 21:37:50 +00:00

ox-texinfo: Fix corner case when fixing a node name

* lisp/ox-texinfo.el (org-texinfo--sanitize-node): Handle
  " (not)allowed" case.
This commit is contained in:
Nicolas Goaziou 2014-08-11 19:47:47 +02:00
parent 7286925b7d
commit e112f3c0df

View file

@ -487,12 +487,11 @@ guarantees the node name is unique."
Trim string and collapse multiple whitespace characters as they
are not significant. Also remove the following characters: @
{ } ( ) : . ,"
(org-trim
(replace-regexp-in-string
"[:,.]" ""
(replace-regexp-in-string
"[:,.]" ""
(replace-regexp-in-string
"\\`(\\(.*)\\)" "[\\1"
(replace-regexp-in-string "[ \t]\\{2,\\}" " " title)))))
"\\`(\\(.*)\\)" "[\\1"
(org-trim (replace-regexp-in-string "[ \t]\\{2,\\}" " " title)))))
;;;; Content sanitizing