Browse Source

org-element: Fix target interpretation

* contrib/lisp/org-element.el (org-element-target-parser): Fix
  docstring.
(org-element-target-interpreter): Fix target interpretation.
Nicolas Goaziou 13 years ago
parent
commit
f188721692
1 changed files with 4 additions and 5 deletions
  1. 4 5
      contrib/lisp/org-element.el

+ 4 - 5
contrib/lisp/org-element.el

@@ -2369,9 +2369,8 @@ CONTENTS is the contents of the object."
 (defun org-element-target-parser ()
   "Parse target at point.
 
-Return a list whose car is `target' and cdr a plist with
-`:begin', `:end', `:contents-begin', `:contents-end', `value' and
-`:post-blank' as keywords.
+Return a list whose CAR is `target' and CDR a plist with
+`:begin', `:end', `value' and `:post-blank' as keywords.
 
 Assume point is at the target."
   (save-excursion
@@ -2389,8 +2388,8 @@ Assume point is at the target."
 
 (defun org-element-target-interpreter (target contents)
   "Interpret TARGET object as Org syntax.
-CONTENTS is the contents of target."
-  (concat ""))
+CONTENTS is nil."
+  (format "<<%s>>" (org-element-property :value target)))
 
 (defun org-element-target-successor (limit)
   "Search for the next target object.