[O] How to get a list of all TODO keywords from defined variable `org-todo-keywords`?

[numbch...@gmail.com]

 I'm trying to select TODO keyword when doing org-capture.

Like this:

    (setq org-capture-templates
    '(("c" "[C]apture"
    entry (file "")
    ;; HACK: select todo keyword interactively from `org-todo-keywords'.
    ;; 1. command `org-todo'
    "* %(completing-read \"Todo keyword: \" (mapcar #'list
org-todo-keywords-1) nil t) %^{Capture}\n\n%i\n%a\n\n%?"
    :prepend t
    :empty-lines 1
    )
    ...
    ))


But it is not working as I expected. I borrow this snippet code from
command `org-todo`.

hope someone can provide a good solution for my purpose.


[stardiviner]           <Hack this world!>      GPG key ID: 47C32433
IRC(freeenode): stardiviner                     Twitter:  @numbchild
Key fingerprint = 9BAA 92BC CDDD B9EF 3B36  CB99 B8C4 B8E5 47C3 2433
Blog: http://stardiviner.github.io/