diff options
| -rw-r--r-- | nov.el | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -50,7 +50,7 @@ (require 'seq) (require 'shr) (require 'url-parse) -(require 'xml) +(require 'url-util) (require 'bookmark) (require 'easymenu) @@ -406,8 +406,8 @@ Each alist item consists of the identifier and full path." (when (not href) (error "Navigation point is missing href attribute")) (let ((link (format "<a href=\"%s\">%s</a>" - (xml-escape-string href) - (xml-escape-string (or label href))))) + (url-insert-entities-in-string href) + (url-insert-entities-in-string (or label href))))) (if children (progn (insert (format "<li>\n%s\n<ol>\n" link)) |