Browse Source

org-html.el (org-export-html-special-string-regexps): Reintroduce

* org-html.el (org-export-html-special-string-regexps):
Reintroduce.

Thanks to Samuel Wales for reporting this.
Bastien Guerry 5 years ago
parent
commit
b6eceef02a
1 changed files with 7 additions and 0 deletions
  1. 7 0
      contrib/lisp/org-html.el

+ 7 - 0
contrib/lisp/org-html.el

@@ -2463,6 +2463,13 @@ is nil, return nil."
 	      (setq start (+ start (length wd))))))))
   s)
 
+(defconst org-export-html-special-string-regexps
+  '(("\\\\-" . "­")
+    ("---\\([^-]\\)" . "—\\1")
+    ("--\\([^-]\\)" . "–\\1")
+    ("\\.\\.\\." . "…"))
+  "Regular expressions for special string conversion.")
+
 (defun org-export-html-convert-special-strings (string)
   "Convert special characters in STRING to HTML."
   (let ((all org-export-html-special-string-regexps)