Function: Texinfo-nodename-escape

Texinfo-nodename-escape is a byte-compiled function defined in tex-info.el.

Signature

(Texinfo-nodename-escape NODE-NAME)

Documentation

Convert in NODE-NAME the , characters to @comma{} commands. Return the resulting string.

Source Code

;; Defined in ~/.emacs.d/elpa/auctex-14.1.2/tex-info.el
(defun Texinfo-nodename-escape (node-name)
  "Convert in NODE-NAME the `,' characters to `@comma{}'
commands.  Return the resulting string."
  (let* ((pos 0)
         (map '(("," . "comma")))
         (re (regexp-opt (mapcar #'car map))) )
    (while (and (< pos (length node-name)) (string-match re node-name pos))
      (setq node-name (concat  (substring node-name 0 (match-beginning 0))
                               "@" (cdr (assoc-string (match-string 0 node-name) map))
                               "{}"
                               (substring node-name (match-end 0)))
            pos (1+ (match-beginning 0)))))
  node-name)