Skip to content

Instantly share code, notes, and snippets.

@slackorama
Created June 22, 2016 16:28
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save slackorama/c9a823dd4bf728142b1f6f80bd6c7b75 to your computer and use it in GitHub Desktop.
Save slackorama/c9a823dd4bf728142b1f6f80bd6c7b75 to your computer and use it in GitHub Desktop.
Debugger entered--Lisp error: (void-function org-capture-template-prompt-history::Title)
org-capture-template-prompt-history::Title("" nil t)
all-completions("" org-capture-template-prompt-history::Title nil)
helm-comp-read-get-candidates(org-capture-template-prompt-history::Title nil nil nil)
#[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]()
apply(#[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"] nil)
helm-funcall-with-source(((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"])
helm-interpret-value(#[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"] ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)))
#[0 "\302\203\303\302!\207\303\301\300\"\207" [((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"] nil helm-interpret-value] 3 "\n\n(fn)"]()
funcall(#[0 "\302\203\303\302!\207\303\301\300\"\207" [((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"] nil helm-interpret-value] 3 "\n\n(fn)"])
helm-get-candidates(((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)))
helm-get-cached-candidates(((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)))
helm-compute-matches(((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)))
#[0 "\302\300\303\211:\203@\262\304!B\262A\262\202\211\237\266\203)\207" [(((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) throw-on-input input nil helm-compute-matches] 5 "\n\n(fn)"]()
funcall(#[0 "\302\300\303\211:\203@\262\304!B\262A\262\202\211\237\266\203)\207" [(((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) throw-on-input input nil helm-compute-matches] 5 "\n\n(fn)"])
#[0 "\302\303\304\305\306\307\310\311\300!\312\"\313\314%D\215)\207" [(((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) inhibit-quit nil input funcall make-byte-code 0 "\302\300\303\211:\203@\262\304!B\262A\262\202\211\237\266\203)\207" vconcat vector [throw-on-input input nil helm-compute-matches] 5 "\n\n(fn)"] 8 "\n\n(fn)"]()
funcall(#[0 "\302\303\304\305\306\307\310\311\300!\312\"\313\314%D\215)\207" [(((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) inhibit-quit nil input funcall make-byte-code 0 "\302\300\303\211:\203@\262\304!B\262A\262\202\211\237\266\203)\207" vconcat vector [throw-on-input input nil helm-compute-matches] 5 "\n\n(fn)"] 8 "\n\n(fn)"])
helm--collect-matches((((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))))
helm-update(nil)
helm-read-pattern-maybe("Title: " nil nil noresume (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title)
#[0 "\311\211\211\211\305\206\n&&'()*\312\313+\"\314\315\316\317\320\321!\322\"\323\324%DC\216\325\303\301\307\300$\210\326&!\210,\203?\327\330!\210\331\332\333\"\210\331\332\334\"\210\335\336!\210\314\337DC\216\340\302\301\304\303\306\307\310&\210*\210'?\205g\341 \335\342\343\344\345\"P!\210-\207" [(((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) nil "Title: " noresume nil "*helm-mode-org-capture*" (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title nil mapcar #[257 "\211JB\207" [] 3 "\n\n(fn V)"] funcall make-byte-code 0 "\300\301\211:\203@\262\211A\262\242\262\211L\210A\262\202\266\302\303!\207" vconcat vector [nil helm-log "restore variables"] 5 "\n\n(fn)" helm-initialize helm-display-buffer helm--remap-mouse-mode 1 add-hook post-command-hook helm--maybe-update-keymap helm--update-header-line helm-log "show prompt" #[0 "\300 \207" [helm-cleanup] 1 "\n\n(fn)"] helm-read-pattern-maybe helm-execute-selection-action "[End session] " make-string 41 45 helm-buffer helm-quit helm-in-persistent-action helm-current-source helm-source-name helm-restored-variables helm-prevent-escaping-from-minibuffer] 9 "\n\n(fn)"]()
funcall(#[0 "\311\211\211\211\305\206\n&&'()*\312\313+\"\314\315\316\317\320\321!\322\"\323\324%DC\216\325\303\301\307\300$\210\326&!\210,\203?\327\330!\210\331\332\333\"\210\331\332\334\"\210\335\336!\210\314\337DC\216\340\302\301\304\303\306\307\310&\210*\210'?\205g\341 \335\342\343\344\345\"P!\210-\207" [(((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) nil "Title: " noresume nil "*helm-mode-org-capture*" (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title nil mapcar #[257 "\211JB\207" [] 3 "\n\n(fn V)"] funcall make-byte-code 0 "\300\301\211:\203@\262\211A\262\242\262\211L\210A\262\202\266\302\303!\207" vconcat vector [nil helm-log "restore variables"] 5 "\n\n(fn)" helm-initialize helm-display-buffer helm--remap-mouse-mode 1 add-hook post-command-hook helm--maybe-update-keymap helm--update-header-line helm-log "show prompt" #[0 "\300 \207" [helm-cleanup] 1 "\n\n(fn)"] helm-read-pattern-maybe helm-execute-selection-action "[End session] " make-string 41 45 helm-buffer helm-quit helm-in-persistent-action helm-current-source helm-source-name helm-restored-variables helm-prevent-escaping-from-minibuffer] 9 "\n\n(fn)"])
helm-internal((((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) nil "Title: " noresume nil "*helm-mode-org-capture*" (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title)
apply(helm-internal ((((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) nil "Title: " noresume nil "*helm-mode-org-capture*" (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title))
helm((((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) nil "Title: " noresume nil "*helm-mode-org-capture*" (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title)
apply(helm ((((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) nil "Title: " noresume nil "*helm-mode-org-capture*" (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) "" org-capture-template-prompt-history::Title))
helm(:sources (((name . "org-capture") (candidates . #[0 "\306\300\301\304\305$\307\303\242\310=\204O\311\230\204O\312\"\204O\312\313!\"\204O\235\204O\227\235\204O\226\235\204O\314\315\316\311#C\"\262\310\317\302\"\207" [nil nil "" (nil) nil nil helm-comp-read-get-candidates nil t "" assoc intern append replace-regexp-in-string "\\s\\" helm-cr-default helm-cr-unknown-pattern-flag helm-pattern] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (requires-pattern . 0) (filtered-candidate-transformer helm-cr-default-transformer helm-fuzzy-highlight-matches) (volatile) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin)) ((name . "org-capture History") (candidates . #[0 "\304\302\300\305\303$\211\205\306\307\310\301\"\"\207" [nil "" org-capture-template-prompt-history::Title nil helm-comp-read-get-candidates nil delete "" helm-cr-default] 6 "\n\n(fn)"]) (action ("Sole action (Identity)" lambda (candidate) (if nil (helm-marked-candidates) (identity candidate)))) (persistent-help . "DoNothing") (filtered-candidate-transformer (lambda (candidates sources) (cl-loop for i in candidates for cand = (replace-regexp-in-string "\\s\\" "" i) collect cand)) helm-fuzzy-highlight-matches) (match helm-mm-exact-match helm-mm-match) (mode-line . "\\<helm-comp-read-map>C/\\[helm-cr-empty-string]:Empty \\<helm-map>\\[helm-help]:Help \\[helm-select-action]:Act \\[helm-maybe-exit-minibuffer]/f1/f2/f-n:NthAct \\[helm-toggle-suspend-update]:Tog.suspend") (header-line . "C-j: DoNothing (keeping session)") (dont-plug helm-compile-source--multi-match helm-compile-source--persistent-help helm-compile-source--migemo) (matchplugin))) :input nil :default "" :preselect nil :prompt "Title: " :resume noresume :candidate-number-limit 100 :case-fold-search smart :keymap (keymap (27 keymap (13 . helm-cr-empty-string)) (C-return . helm-cr-empty-string) keymap (127 . helm-backspace) (tab . helm-execute-persistent-action) (f13 lambda nil (interactive) (helm-select-nth-action 12)) (f12 lambda nil (interactive) (helm-select-nth-action 11)) (f11 lambda nil (interactive) (helm-select-nth-action 10)) (f10 lambda nil (interactive) (helm-select-nth-action 9)) (f9 lambda nil (interactive) (helm-select-nth-action 8)) (f8 lambda nil (interactive) (helm-select-nth-action 7)) (f7 lambda nil (interactive) (helm-select-nth-action 6)) (f6 lambda nil (interactive) (helm-select-nth-action 5)) (f5 lambda nil (interactive) (helm-select-nth-action 4)) (f4 lambda nil (interactive) (helm-select-nth-action 3)) (f3 lambda nil (interactive) (helm-select-nth-action 2)) (f2 lambda nil (interactive) (helm-select-nth-action 1)) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode . helm-help)))) (help keymap (109 . helm-help)) (f1 lambda nil (interactive) (helm-select-nth-action 0)) (8 keymap (109 . helm-help) (104 . undefined) (8 . undefined) (4 . helm-enable-or-switch-to-debug)) (20 . helm-toggle-resplit-and-swap-windows) (C-tab . undefined) (67108897 . helm-toggle-suspend-update) (3 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth 9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth 8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth 7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth 6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth 5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth 4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth 3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth 2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth 1)) (63 . helm-help) (62 . helm-toggle-truncate-line) (21 . helm-refresh) (6 . helm-follow-mode) (9 . helm-copy-to-buffer) (11 . helm-kill-selection-and-quit) (25 . helm-yank-selection) (45 . helm-swap-windows)) (67108987 . helm-enlarge-window) (67108989 . helm-narrow-window) (19 . undefined) (18 . undefined) (23 . helm-yank-text-at-point) (24 keymap (57 lambda nil (interactive) (helm-execute-selection-action-at-nth -9)) (56 lambda nil (interactive) (helm-execute-selection-action-at-nth -8)) (55 lambda nil (interactive) (helm-execute-selection-action-at-nth -7)) (54 lambda nil (interactive) (helm-execute-selection-action-at-nth -6)) (53 lambda nil (interactive) (helm-execute-selection-action-at-nth -5)) (52 lambda nil (interactive) (helm-execute-selection-action-at-nth -4)) (51 lambda nil (interactive) (helm-execute-selection-action-at-nth -3)) (50 lambda nil (interactive) (helm-execute-selection-action-at-nth -2)) (49 lambda nil (interactive) (helm-execute-selection-action-at-nth -1)) (2 . helm-resume-list-buffers-after-quit) (98 . helm-resume-previous-session-after-quit) (6 . helm-quit-and-find-file)) (11 . helm-delete-minibuffer-contents) (67108896 . helm-toggle-visible-mark) (0 . helm-toggle-visible-mark) (C-M-up . helm-scroll-other-window-down) (C-M-down . helm-scroll-other-window) (M-prior . helm-scroll-other-window-down) (M-next . helm-scroll-other-window) (12 . helm-recenter-top-bottom-other-window) (15 . helm-next-source) (10 . helm-execute-persistent-action) (26 . helm-select-action) (9 . helm-execute-persistent-action) (13 . helm-maybe-exit-minibuffer) (left . helm-previous-source) (right . helm-next-source) (7 . helm-keyboard-quit) (22 . helm-next-page) (27 keymap (110 . next-history-element) (112 . previous-history-element) (115 . undefined) (5 . helm-display-all-sources) (1 . helm-show-all-in-this-source-only) (85 . helm-unmark-all) (97 . helm-mark-all) (109 . helm-toggle-all-marks) (41 . helm-next-visible-mark) (40 . helm-prev-visible-mark) (91) (32 . helm-toggle-visible-mark) (33554454 . helm-scroll-other-window-down) (25 . helm-scroll-other-window-down) (22 . helm-scroll-other-window) (12 . helm-reposition-window-other-window) (62 . helm-end-of-buffer) (60 . helm-beginning-of-buffer) (118 . helm-previous-page)) ...) :history org-capture-template-prompt-history::Title :buffer "*helm-mode-org-capture*")
helm-comp-read("Title: " nil :test nil :history org-capture-template-prompt-history::Title :reverse-history t :input-history org-capture-template-prompt-history::Title :must-match nil :alistp nil :name "org-capture" :requires-pattern 0 :candidates-in-buffer nil :exec-when-only-one nil :fuzzy nil :buffer "*helm-mode-org-capture*" :default "" :initial-input nil)
helm-completing-read-default-1("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil "org-capture" "*helm-mode-org-capture*")
#[0 "\310 \206&\311!\312\313\"'\236\211\243\211\205\311!\300\301\302\303\304\305\306\307\257\314D\"\315\211()*\315\211:\203^@\262:\204W\316!\204W+>\204WB\262A\262\2027\211\237\266\203*\315,\317=\203p\320\262\203\213\204\213\321\322\323\324DC\216\325\326!\210\327-\")\"\210\330=\204\235;\203\241\331\332\"\204\241\325\326!\210\323\333\334\335\336\337 !\340\"\341\342%DC\216\203\302\203\302\327\"\202\367\203\335\320=\203\335\301>\343\344\301\302#\240\210\327\"\202\367\203\350\327\"\202\367\345\300\301\302\303\304\305\306\307&\n-\207" ["Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil helm-this-command helm-symbol-name format "*helm-mode-%s*" append nil byte-code-function-p ido ido-completing-read throw --cl-block-helm--completing-read-default-- funcall #[0 "\300\301!\207" [helm-mode 1] 2 "\n\n(fn)"] helm-mode -1 apply completing-read string-match "^helm" make-byte-code 0 "\302\303!\210\300\211\207" vconcat vector [this-command helm-mode 1] 2 "\n\n(fn)" all-completions "" helm-completing-read-default-1 this-command helm-completing-read-handlers-alist helm-completion-mode-start-message helm-completion-mode-quit-message minibuffer-setup-hook helm-mode-minibuffer-setup-hook-black-list unread-command-events completing-read-function] 20 "\n\n(fn)"]()
funcall(#[0 "\310 \206&\311!\312\313\"'\236\211\243\211\205\311!\300\301\302\303\304\305\306\307\257\314D\"\315\211()*\315\211:\203^@\262:\204W\316!\204W+>\204WB\262A\262\2027\211\237\266\203*\315,\317=\203p\320\262\203\213\204\213\321\322\323\324DC\216\325\326!\210\327-\")\"\210\330=\204\235;\203\241\331\332\"\204\241\325\326!\210\323\333\334\335\336\337 !\340\"\341\342%DC\216\203\302\203\302\327\"\202\367\203\335\320=\203\335\301>\343\344\301\302#\240\210\327\"\202\367\203\350\327\"\202\367\345\300\301\302\303\304\305\306\307&\n-\207" ["Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil helm-this-command helm-symbol-name format "*helm-mode-%s*" append nil byte-code-function-p ido ido-completing-read throw --cl-block-helm--completing-read-default-- funcall #[0 "\300\301!\207" [helm-mode 1] 2 "\n\n(fn)"] helm-mode -1 apply completing-read string-match "^helm" make-byte-code 0 "\302\303!\210\300\211\207" vconcat vector [this-command helm-mode 1] 2 "\n\n(fn)" all-completions "" helm-completing-read-default-1 this-command helm-completing-read-handlers-alist helm-completion-mode-start-message helm-completion-mode-quit-message minibuffer-setup-hook helm-mode-minibuffer-setup-hook-black-list unread-command-events completing-read-function] 20 "\n\n(fn)"])
helm--completing-read-default("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil)
apply(helm--completing-read-default ("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil))
#[128 "\300\301\"\207" [apply helm--completing-read-default completing-read-default nil] 4 nil]("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil)
completing-read("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil nil)
apply(completing-read ("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil))
(let ((enable-recursive-minibuffers t) (minibuffer-local-completion-map (copy-keymap minibuffer-local-completion-map))) (org-defkey minibuffer-local-completion-map " " (quote self-insert-command)) (org-defkey minibuffer-local-completion-map "?" (quote self-insert-command)) (org-defkey minibuffer-local-completion-map (kbd "C-c !") (quote org-time-stamp-inactive)) (apply (function completing-read) args))
org-completing-read("Title: " nil nil nil nil org-capture-template-prompt-history::Title nil)
(cons (org-completing-read (concat (or prompt "Enter string") (and default (format " [%s]" default)) ": ") completions nil nil nil histvar default) strings)
(setq strings (cons (org-completing-read (concat (or prompt "Enter string") (and default (format " [%s]" default)) ": ") completions nil nil nil histvar default) strings))
(let nil (setq strings (cons (org-completing-read (concat (or prompt "Enter string") (and default (format " [%s]" default)) ": ") completions nil nil nil histvar default) strings)) (insert (car strings)))
(cond ((member key (quote ("G" "g"))) (let nil (let* ((org-last-tags-completion-table (org-global-tags-completion-table (cond ... ... ...))) (org-add-colon-after-tag-completion t) (ins (mapconcat (function identity) (org-split-string ... "[^[:alnum:]_@#%]+") ":"))) (if (org-string-nw-p ins) (progn (if (eq ... 58) nil (insert ":")) (insert ins) (if (eq ... 58) nil (insert ":")) (and (org-at-heading-p) (let ... ...))))))) ((equal key "C") (let nil (cond ((= (length clipboards) 1) (insert (car clipboards))) ((> (length clipboards) 1) (insert (read-string "Clipboard/kill value: " (car clipboards) (quote ...) (car clipboards))))))) ((equal key "L") (let nil (cond ((= (length clipboards) 1) (org-insert-link 0 (car clipboards))) ((> (length clipboards) 1) (org-insert-link 0 (read-string "Clipboard/kill value: " (car clipboards) (quote ...) (car clipboards))))))) ((equal key "p") (let nil (org-set-property prompt nil))) (key (let nil (let* ((upcase\? (equal (upcase key) key)) (org-time-was-given upcase\?) (org-end-time-was-given) (time (org-read-date upcase\? t nil prompt))) (org-insert-time-stamp time org-time-was-given (member key (quote ("u" "U"))) nil nil (list org-end-time-was-given))))) (t (let nil (setq strings (cons (org-completing-read (concat (or prompt "Enter string") (and default ...) ": ") completions nil nil nil histvar default) strings)) (insert (car strings)))))
(if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond ((member key (quote ("G" "g"))) (let nil (let* ((org-last-tags-completion-table (org-global-tags-completion-table ...)) (org-add-colon-after-tag-completion t) (ins (mapconcat ... ... ":"))) (if (org-string-nw-p ins) (progn (if ... nil ...) (insert ins) (if ... nil ...) (and ... ...)))))) ((equal key "C") (let nil (cond ((= (length clipboards) 1) (insert (car clipboards))) ((> (length clipboards) 1) (insert (read-string "Clipboard/kill value: " ... ... ...)))))) ((equal key "L") (let nil (cond ((= (length clipboards) 1) (org-insert-link 0 (car clipboards))) ((> (length clipboards) 1) (org-insert-link 0 (read-string "Clipboard/kill value: " ... ... ...)))))) ((equal key "p") (let nil (org-set-property prompt nil))) (key (let nil (let* ((upcase\? (equal ... key)) (org-time-was-given upcase\?) (org-end-time-was-given) (time (org-read-date upcase\? t nil prompt))) (org-insert-time-stamp time org-time-was-given (member key (quote ...)) nil nil (list org-end-time-was-given))))) (t (let nil (setq strings (cons (org-completing-read (concat ... ... ": ") completions nil nil nil histvar default) strings)) (insert (car strings))))))
(let* ((items (and (match-end 1) (let ((save-match-data-internal (match-data))) (unwind-protect (progn (split-string ... "|")) (set-match-data save-match-data-internal (quote evaporate)))))) (key (match-string 2)) (beg (copy-marker (match-beginning 0))) (end (copy-marker (match-end 0))) (prompt (nth 0 items)) (default (nth 1 items)) (completions (nthcdr 2 items)) (histvar (intern (concat "org-capture-template-prompt-history::" (or prompt ""))))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond ((member key (quote ("G" "g"))) (let nil (let* ((org-last-tags-completion-table ...) (org-add-colon-after-tag-completion t) (ins ...)) (if (org-string-nw-p ins) (progn ... ... ... ...))))) ((equal key "C") (let nil (cond ((= ... 1) (insert ...)) ((> ... 1) (insert ...))))) ((equal key "L") (let nil (cond ((= ... 1) (org-insert-link 0 ...)) ((> ... 1) (org-insert-link 0 ...))))) ((equal key "p") (let nil (org-set-property prompt nil))) (key (let nil (let* ((upcase\? ...) (org-time-was-given upcase\?) (org-end-time-was-given) (time ...)) (org-insert-time-stamp time org-time-was-given (member key ...) nil nil (list org-end-time-was-given))))) (t (let nil (setq strings (cons (org-completing-read ... completions nil nil nil histvar default) strings)) (insert (car strings)))))))
(while (re-search-forward regexp nil t) (let* ((items (and (match-end 1) (let ((save-match-data-internal ...)) (unwind-protect (progn ...) (set-match-data save-match-data-internal ...))))) (key (match-string 2)) (beg (copy-marker (match-beginning 0))) (end (copy-marker (match-end 0))) (prompt (nth 0 items)) (default (nth 1 items)) (completions (nthcdr 2 items)) (histvar (intern (concat "org-capture-template-prompt-history::" (or prompt ""))))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond ((member key (quote ("G" "g"))) (let nil (let* (... ... ...) (if ... ...)))) ((equal key "C") (let nil (cond (... ...) (... ...)))) ((equal key "L") (let nil (cond (... ...) (... ...)))) ((equal key "p") (let nil (org-set-property prompt nil))) (key (let nil (let* (... ... ... ...) (org-insert-time-stamp time org-time-was-given ... nil nil ...)))) (t (let nil (setq strings (cons ... strings)) (insert (car strings))))))))
(let ((regexp "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?")) (while (re-search-forward regexp nil t) (let* ((items (and (match-end 1) (let (...) (unwind-protect ... ...)))) (key (match-string 2)) (beg (copy-marker (match-beginning 0))) (end (copy-marker (match-end 0))) (prompt (nth 0 items)) (default (nth 1 items)) (completions (nthcdr 2 items)) (histvar (intern (concat "org-capture-template-prompt-history::" (or prompt ""))))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond ((member key (quote ...)) (let nil (let* ... ...))) ((equal key "C") (let nil (cond ... ...))) ((equal key "L") (let nil (cond ... ...))) ((equal key "p") (let nil (org-set-property prompt nil))) (key (let nil (let* ... ...))) (t (let nil (setq strings ...) (insert ...))))))))
(save-excursion (let ((regexp "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?")) (while (re-search-forward regexp nil t) (let* ((items (and (match-end 1) (let ... ...))) (key (match-string 2)) (beg (copy-marker (match-beginning 0))) (end (copy-marker (match-end 0))) (prompt (nth 0 items)) (default (nth 1 items)) (completions (nthcdr 2 items)) (histvar (intern (concat "org-capture-template-prompt-history::" ...)))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond ((member key ...) (let nil ...)) ((equal key "C") (let nil ...)) ((equal key "L") (let nil ...)) ((equal key "p") (let nil ...)) (key (let nil ...)) (t (let nil ... ...))))))))
(let (strings) (save-excursion (let ((regexp "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?")) (while (re-search-forward regexp nil t) (let* ((items (and ... ...)) (key (match-string 2)) (beg (copy-marker ...)) (end (copy-marker ...)) (prompt (nth 0 items)) (default (nth 1 items)) (completions (nthcdr 2 items)) (histvar (intern ...))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond (... ...) (... ...) (... ...) (... ...) (key ...) (t ...))))))) (setq strings (nreverse strings)) (save-excursion (while (re-search-forward "%\\\\\\([1-9][0-9]*\\)" nil t) (if (org-capture-escaped-%) nil (replace-match (nth (1- (string-to-number ...)) strings) nil t)))))
(progn (org-switch-to-buffer-other-window (get-buffer-create "*Capture*")) (erase-buffer) (setq buffer-file-name nil) (setq mark-active nil) (insert template) (goto-char (point-min)) (save-excursion (while (re-search-forward "%\\[\\(.+\\)\\]" nil t) (let ((filename (expand-file-name (match-string 1))) (beg (copy-marker (match-beginning 0))) (end (copy-marker (match-end 0)))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (condition-case error (insert-file-contents filename) (error (insert ...))))))) (org-capture-expand-embedded-elisp (quote mark)) (let ((regexp "%\\(:[-a-za-z]+\\|<\\([^>\n]+\\)>\\|[aAcfFikKlntTuUx]\\)")) (save-excursion (while (re-search-forward regexp nil t) (let ((pos (copy-marker ...)) (end (copy-marker ...)) (value (match-string 1)) (time-string (match-string 2))) (if (org-capture-escaped-%) nil (delete-region pos end) (set-marker pos nil) (set-marker end nil) (let (...) (insert ...))))))) (org-capture-expand-embedded-elisp) (let ((org-inhibit-startup t)) (org-mode)) (org-clone-local-variables buffer "\\`org-") (let (strings) (save-excursion (let ((regexp "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?")) (while (re-search-forward regexp nil t) (let* ((items ...) (key ...) (beg ...) (end ...) (prompt ...) (default ...) (completions ...) (histvar ...)) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (cond ... ... ... ... ... ...)))))) (setq strings (nreverse strings)) (save-excursion (while (re-search-forward "%\\\\\\([1-9][0-9]*\\)" nil t) (if (org-capture-escaped-%) nil (replace-match (nth (1- ...) strings) nil t))))) (skip-chars-forward " \n") (delete-region (point-min) (line-beginning-position)) (goto-char (point-max)) (skip-chars-backward " \n") (delete-region (point) (point-max)) (insert "\n") (untabify (point-min) (point-max)) (set-buffer-modified-p nil) (prog1 (buffer-substring-no-properties (point-min) (point-max)) (kill-buffer (current-buffer))))
(unwind-protect (progn (org-switch-to-buffer-other-window (get-buffer-create "*Capture*")) (erase-buffer) (setq buffer-file-name nil) (setq mark-active nil) (insert template) (goto-char (point-min)) (save-excursion (while (re-search-forward "%\\[\\(.+\\)\\]" nil t) (let ((filename (expand-file-name ...)) (beg (copy-marker ...)) (end (copy-marker ...))) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (condition-case error (insert-file-contents filename) (error ...)))))) (org-capture-expand-embedded-elisp (quote mark)) (let ((regexp "%\\(:[-a-za-z]+\\|<\\([^>\n]+\\)>\\|[aAcfFikKlntTuUx]\\)")) (save-excursion (while (re-search-forward regexp nil t) (let ((pos ...) (end ...) (value ...) (time-string ...)) (if (org-capture-escaped-%) nil (delete-region pos end) (set-marker pos nil) (set-marker end nil) (let ... ...)))))) (org-capture-expand-embedded-elisp) (let ((org-inhibit-startup t)) (org-mode)) (org-clone-local-variables buffer "\\`org-") (let (strings) (save-excursion (let ((regexp "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?")) (while (re-search-forward regexp nil t) (let* (... ... ... ... ... ... ... ...) (if ... nil ... ... ... ...))))) (setq strings (nreverse strings)) (save-excursion (while (re-search-forward "%\\\\\\([1-9][0-9]*\\)" nil t) (if (org-capture-escaped-%) nil (replace-match (nth ... strings) nil t))))) (skip-chars-forward " \n") (delete-region (point-min) (line-beginning-position)) (goto-char (point-max)) (skip-chars-backward " \n") (delete-region (point) (point-max)) (insert "\n") (untabify (point-min) (point-max)) (set-buffer-modified-p nil) (prog1 (buffer-substring-no-properties (point-min) (point-max)) (kill-buffer (current-buffer)))) (set-window-configuration wconfig))
(let ((wconfig (current-window-configuration))) (unwind-protect (progn (org-switch-to-buffer-other-window (get-buffer-create "*Capture*")) (erase-buffer) (setq buffer-file-name nil) (setq mark-active nil) (insert template) (goto-char (point-min)) (save-excursion (while (re-search-forward "%\\[\\(.+\\)\\]" nil t) (let ((filename ...) (beg ...) (end ...)) (if (org-capture-escaped-%) nil (delete-region beg end) (set-marker beg nil) (set-marker end nil) (condition-case error ... ...))))) (org-capture-expand-embedded-elisp (quote mark)) (let ((regexp "%\\(:[-a-za-z]+\\|<\\([^>\n]+\\)>\\|[aAcfFikKlntTuUx]\\)")) (save-excursion (while (re-search-forward regexp nil t) (let (... ... ... ...) (if ... nil ... ... ... ...))))) (org-capture-expand-embedded-elisp) (let ((org-inhibit-startup t)) (org-mode)) (org-clone-local-variables buffer "\\`org-") (let (strings) (save-excursion (let ((regexp "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?")) (while (re-search-forward regexp nil t) (let* ... ...)))) (setq strings (nreverse strings)) (save-excursion (while (re-search-forward "%\\\\\\([1-9][0-9]*\\)" nil t) (if (org-capture-escaped-%) nil (replace-match ... nil t))))) (skip-chars-forward " \n") (delete-region (point-min) (line-beginning-position)) (goto-char (point-max)) (skip-chars-backward " \n") (delete-region (point) (point-max)) (insert "\n") (untabify (point-min) (point-max)) (set-buffer-modified-p nil) (prog1 (buffer-substring-no-properties (point-min) (point-max)) (kill-buffer (current-buffer)))) (set-window-configuration wconfig)))
(let* ((template (or template (org-capture-get :template))) (buffer (org-capture-get :buffer)) (file (buffer-file-name (or (buffer-base-buffer buffer) buffer))) (time (let* ((c (or (org-capture-get :default-time) (current-time))) (d (decode-time c))) (if (< (nth 2 d) org-extend-today-until) (encode-time 0 59 23 (1- (nth 3 d)) (nth 4 d) (nth 5 d)) c))) (v-t (format-time-string (org-time-stamp-format nil) time)) (v-T (format-time-string (org-time-stamp-format t) time)) (v-u (format-time-string (org-time-stamp-format nil t) time)) (v-U (format-time-string (org-time-stamp-format t t) time)) (v-c (and kill-ring (current-kill 0))) (v-x (or (org-get-x-clipboard (quote PRIMARY)) (org-get-x-clipboard (quote CLIPBOARD)) (org-get-x-clipboard (quote SECONDARY)))) (v-i (or (plist-get org-store-link-plist :initial) (and (stringp initial) (org-no-properties initial)) (org-capture-get :initial) "")) (v-a (let ((a (or (plist-get org-store-link-plist :annotation) annotation (org-capture-get :annotation) ""))) (if (equal a "[[]]") "" a))) (l-re "\\[\\[\\(.*?\\)\\]\\(\\[.*?\\]\\)?\\]") (v-A (if (and v-a (string-match l-re v-a)) (replace-match "[[\\1][%^{Link description}]]" nil nil v-a) v-a)) (v-l (if (and v-a (string-match l-re v-a)) (replace-match "\\1" nil nil v-a) v-a)) (v-n user-full-name) (v-k (and (marker-buffer org-clock-marker) (org-no-properties org-clock-heading))) (v-K (if (marker-buffer org-clock-marker) (org-make-link-string (buffer-file-name (marker-buffer org-clock-marker)) org-clock-heading))) (v-f (or (org-capture-get :original-file-nondirectory) "")) (v-F (or (org-capture-get :original-file) "")) (clipboards (delq nil (list v-i (org-get-x-clipboard (quote PRIMARY)) (org-get-x-clipboard (quote CLIPBOARD)) (org-get-x-clipboard (quote SECONDARY)) v-c)))) (setq org-store-link-plist (plist-put org-store-link-plist :annotation v-a)) (setq org-store-link-plist (plist-put org-store-link-plist :initial v-i)) (if template nil (setq template "") (message "no template") (ding) (sit-for 1)) (let ((wconfig (current-window-configuration))) (unwind-protect (progn (org-switch-to-buffer-other-window (get-buffer-create "*Capture*")) (erase-buffer) (setq buffer-file-name nil) (setq mark-active nil) (insert template) (goto-char (point-min)) (save-excursion (while (re-search-forward "%\\[\\(.+\\)\\]" nil t) (let (... ... ...) (if ... nil ... ... ... ...)))) (org-capture-expand-embedded-elisp (quote mark)) (let ((regexp "%\\(:[-a-za-z]+\\|<\\([^>\n]+\\)>\\|[aAcfFikKlntTuUx]\\)")) (save-excursion (while (re-search-forward regexp nil t) (let ... ...)))) (org-capture-expand-embedded-elisp) (let ((org-inhibit-startup t)) (org-mode)) (org-clone-local-variables buffer "\\`org-") (let (strings) (save-excursion (let (...) (while ... ...))) (setq strings (nreverse strings)) (save-excursion (while (re-search-forward "%\\\\\\([1-9][0-9]*\\)" nil t) (if ... nil ...)))) (skip-chars-forward " \n") (delete-region (point-min) (line-beginning-position)) (goto-char (point-max)) (skip-chars-backward " \n") (delete-region (point) (point-max)) (insert "\n") (untabify (point-min) (point-max)) (set-buffer-modified-p nil) (prog1 (buffer-substring-no-properties (point-min) (point-max)) (kill-buffer (current-buffer)))) (set-window-configuration wconfig))))
org-capture-fill-template()
(org-capture-put :template (org-capture-fill-template))
(condition-case error (org-capture-put :template (org-capture-fill-template)) ((error quit) (if (get-buffer "*Capture*") (kill-buffer "*Capture*")) (error "Capture abort: %s" error)))
(cond ((equal entry "C") (customize-variable (quote org-capture-templates))) ((equal entry "q") (error "Abort")) (t (org-capture-set-plist entry) (org-capture-get-template) (org-capture-put :original-buffer orig-buf :original-file (or (buffer-file-name orig-buf) (and (featurep (quote dired)) (car (rassq orig-buf dired-buffers)))) :original-file-nondirectory (and (buffer-file-name orig-buf) (file-name-nondirectory (buffer-file-name orig-buf))) :annotation annotation :initial initial :return-to-wconf (current-window-configuration) :default-time (or org-overriding-default-time (org-current-time))) (org-capture-set-target-location) (condition-case error (org-capture-put :template (org-capture-fill-template)) ((error quit) (if (get-buffer "*Capture*") (kill-buffer "*Capture*")) (error "Capture abort: %s" error))) (setq org-capture-clock-keep (org-capture-get :clock-keep)) (if (equal goto 0) (org-capture-insert-template-here) (condition-case error (org-capture-place-template (equal (car (org-capture-get :target)) (quote function))) ((error quit) (if (and (buffer-base-buffer ...) (string-match "\\`CAPTURE-" ...)) (kill-buffer (current-buffer))) (set-window-configuration (org-capture-get :return-to-wconf)) (error "Capture template `%s': %s" (org-capture-get :key) (nth 1 error)))) (if (and (derived-mode-p (quote org-mode)) (org-capture-get :clock-in)) (condition-case nil (progn (if (org-clock-is-active) (org-capture-put :interrupted-clock ...)) (org-clock-in) (set (make-local-variable ...) t)) (error "Could not start the clock in this capture buffer"))) (if (org-capture-get :immediate-finish) (org-capture-finalize)))))
(let* ((orig-buf (current-buffer)) (annotation (if (and (boundp (quote org-capture-link-is-already-stored)) org-capture-link-is-already-stored) (plist-get org-store-link-plist :annotation) (condition-case nil (progn (org-store-link nil)) (error nil)))) (entry (or org-capture-entry (org-capture-select-template keys))) initial) (setq initial (or org-capture-initial (and (org-region-active-p) (buffer-substring (point) (mark))))) (if (stringp initial) (progn (remove-text-properties 0 (length initial) (quote (read-only t)) initial))) (if (stringp annotation) (progn (remove-text-properties 0 (length annotation) (quote (read-only t)) annotation))) (cond ((equal entry "C") (customize-variable (quote org-capture-templates))) ((equal entry "q") (error "Abort")) (t (org-capture-set-plist entry) (org-capture-get-template) (org-capture-put :original-buffer orig-buf :original-file (or (buffer-file-name orig-buf) (and (featurep (quote dired)) (car (rassq orig-buf dired-buffers)))) :original-file-nondirectory (and (buffer-file-name orig-buf) (file-name-nondirectory (buffer-file-name orig-buf))) :annotation annotation :initial initial :return-to-wconf (current-window-configuration) :default-time (or org-overriding-default-time (org-current-time))) (org-capture-set-target-location) (condition-case error (org-capture-put :template (org-capture-fill-template)) ((error quit) (if (get-buffer "*Capture*") (kill-buffer "*Capture*")) (error "Capture abort: %s" error))) (setq org-capture-clock-keep (org-capture-get :clock-keep)) (if (equal goto 0) (org-capture-insert-template-here) (condition-case error (org-capture-place-template (equal (car ...) (quote function))) ((error quit) (if (and ... ...) (kill-buffer ...)) (set-window-configuration (org-capture-get :return-to-wconf)) (error "Capture template `%s': %s" (org-capture-get :key) (nth 1 error)))) (if (and (derived-mode-p (quote org-mode)) (org-capture-get :clock-in)) (condition-case nil (progn (if ... ...) (org-clock-in) (set ... t)) (error "Could not start the clock in this capture buffer"))) (if (org-capture-get :immediate-finish) (org-capture-finalize))))))
(cond ((equal goto (quote (4))) (org-capture-goto-target)) ((equal goto (quote (16))) (org-capture-goto-last-stored)) (t (let* ((orig-buf (current-buffer)) (annotation (if (and (boundp ...) org-capture-link-is-already-stored) (plist-get org-store-link-plist :annotation) (condition-case nil (progn ...) (error nil)))) (entry (or org-capture-entry (org-capture-select-template keys))) initial) (setq initial (or org-capture-initial (and (org-region-active-p) (buffer-substring (point) (mark))))) (if (stringp initial) (progn (remove-text-properties 0 (length initial) (quote (read-only t)) initial))) (if (stringp annotation) (progn (remove-text-properties 0 (length annotation) (quote (read-only t)) annotation))) (cond ((equal entry "C") (customize-variable (quote org-capture-templates))) ((equal entry "q") (error "Abort")) (t (org-capture-set-plist entry) (org-capture-get-template) (org-capture-put :original-buffer orig-buf :original-file (or (buffer-file-name orig-buf) (and ... ...)) :original-file-nondirectory (and (buffer-file-name orig-buf) (file-name-nondirectory ...)) :annotation annotation :initial initial :return-to-wconf (current-window-configuration) :default-time (or org-overriding-default-time (org-current-time))) (org-capture-set-target-location) (condition-case error (org-capture-put :template (org-capture-fill-template)) ((error quit) (if ... ...) (error "Capture abort: %s" error))) (setq org-capture-clock-keep (org-capture-get :clock-keep)) (if (equal goto 0) (org-capture-insert-template-here) (condition-case error (org-capture-place-template ...) (... ... ... ...)) (if (and ... ...) (condition-case nil ... ...)) (if (org-capture-get :immediate-finish) (org-capture-finalize))))))))
org-capture(nil)
call-interactively(org-capture nil nil)
command-execute(org-capture)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment