summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2015-05-13 12:37:53 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2015-05-13 12:37:53 +0200
commitfe0f30e02276391e9b4a56c0c8af2ec9a9efdb04 (patch)
tree87e89ade904ab8dbd5c0d5958a63818c6567f261
parent0e7062678eb224027e5eca70a205430083a13a64 (diff)
downloadorg-mode-fe0f30e02276391e9b4a56c0c8af2ec9a9efdb04.tar.gz
org-element: Tiny refactoring
* lisp/org-element.el (org-element-link-parser): Use `string-to-char' instead of (aref STRING 0).
-rw-r--r--lisp/org-element.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el
index 9037b37..be19dd2 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -3062,7 +3062,7 @@ Assume point is at the beginning of the link."
((string-match "\\`(\\(.*\\))\\'" raw-link)
(setq type "coderef" path (match-string 1 raw-link)))
;; Custom-id type: PATH is the name of the custom id.
- ((= (aref raw-link 0) ?#)
+ ((= (string-to-char raw-link) ?#)
(setq type "custom-id" path (substring raw-link 1)))
;; Fuzzy type: Internal link either matches a target, an
;; headline name or nothing. PATH is the target or