tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org.el (org-link-escape-chars): Remove ?\+ ?\; and ?\= 

* org.el (org-link-escape-chars): Remove ?\+ ?\; and ?\=.

Thanks to Michael Weylandt for suggesting this.
This commit is contained in:
Bastien Guerry 2014-05-25 07:53:56 +02:00
parent 62950827ec
commit abe931dca9
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/org.el
View File

@ -9914,8 +9914,8 @@ according to FMT (default from `org-email-link-description-format')."
"]")) "]"))
(defconst org-link-escape-chars (defconst org-link-escape-chars
;;%20 %2B %3B %3D %5B %5D ;;%20 %5B %5D
'(?\ ?\+ ?\; ?\= ?\[ ?\]) '(?\ ?\[ ?\])
"List of characters that should be escaped in a link when stored to Org. "List of characters that should be escaped in a link when stored to Org.
This is the list that is used for internal purposes.") This is the list that is used for internal purposes.")
@ -10018,9 +10018,8 @@ Note: this function also decodes single byte encodings like
(setq ret (concat ret (org-char-to-string sum))) (setq ret (concat ret (org-char-to-string sum)))
(setq sum 0)) (setq sum 0))
((not bytes) ; single byte(s) ((not bytes) ; single byte(s)
(setq ret (org-link-unescape-single-byte-sequence hex)))) (setq ret (org-link-unescape-single-byte-sequence hex))))))
)) ;; end (while bytes ret)))
ret )))
(defun org-link-unescape-single-byte-sequence (hex) (defun org-link-unescape-single-byte-sequence (hex)
"Unhexify hex-encoded single byte character sequences." "Unhexify hex-encoded single byte character sequences."