summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAchim Gratz <Stromeko@Stromeko.DE>2012-10-07 16:06:24 (GMT)
committer Achim Gratz <Stromeko@Stromeko.DE>2012-10-07 16:11:40 (GMT)
commit93f4b7c6d854e34d77632492588dd44526f44989 (patch)
tree73a85ce46115dd5d07025dca033165f876d2f4e4
parent4b9db1cce022cb3b6f8d9b6769fecc8929df8e4b (diff)
downloadorg-mode-93f4b7c6d854e34d77632492588dd44526f44989.zip
org-mode-93f4b7c6d854e34d77632492588dd44526f44989.tar.gz
remove utf-8 codepoints in docstrings
* lisp/org.el: Remove utf-8 codepoints in docstrings, bytecode doesn't work when loaded from compressed files. Probably a bug in Emacs, but since this is unlikely to be fixed in old Emacsen, simply don't do it.
-rw-r--r--lisp/org.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org.el b/lisp/org.el
index bad5a9e..59683bc 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -9053,7 +9053,7 @@ If optional argument MERGE is set, merge TABLE into
(defun org-link-unescape (str)
"Unhex hexified Unicode strings as returned from the JavaScript function
-encodeURIComponent. E.g. `%C3%B6' is the german Umlaut `ö'."
+encodeURIComponent. E.g. `%C3%B6' is the german o-Umlaut."
(unless (and (null str) (string= "" str))
(let ((pos 0) (case-fold-search t) unhexed)
(while (setq pos (string-match "\\(%[0-9a-f][0-9a-f]\\)+" str pos))
@@ -9063,9 +9063,9 @@ encodeURIComponent. E.g. `%C3%B6' is the german Umlaut `ö'."
str)
(defun org-link-unescape-compound (hex)
- "Unhexify Unicode hex-chars. E.g. `%C3%B6' is the German Umlaut `ö'.
+ "Unhexify Unicode hex-chars. E.g. `%C3%B6' is the German o-Umlaut.
Note: this function also decodes single byte encodings like
-`%E1' (\"á\") if not followed by another `%[A-F0-9]{2}' group."
+`%E1' (a-acute) if not followed by another `%[A-F0-9]{2}' group."
(save-match-data
(let* ((bytes (cdr (split-string hex "%")))
(ret "")