;ELC ;;; Compiled ;;; in Emacs version 30.1 ;;; with all optimizations. #@53 Internal flag, keeping marker to the started clock. (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\207" [require org-macs cl-lib org org-refile] 2) (defvar org-capture-clock-was-started nil (#$ . 83))#@71 Marker pointing to the entry most recently stored with `org-capture'. (defvar org-capture-last-stored-marker (make-marker) (#$ . 303)) (defvar org-capture-link-is-already-stored nil)#@52 Non-nil when capture process is refiling an entry. (defvar org-capture-is-refiling nil (#$ . 491))#@46 Hash table for all history lists per prompt. (defvar org-capture--prompt-history-table (make-hash-table :test 'equal) (#$ . 595))#@39 History list for prompt placeholders. (defvar org-capture--prompt-history nil (#$ . 730))#@253 Update the template list to the new format. TEMPLATES is a template list, as in `org-capture-templates'. The new format unifies all the date/week tree targets into one that also allows for an optional outline path to specify a target. (fn TEMPLATES)#@14 (fn ENTRY) (custom-declare-group 'org-capture nil "Options concerning capturing new entries." :tag "Org Capture" :group 'org) (defalias 'org-capture-upgrade-templates #[257 "\300\301\"\211\232\204\302\303!\210\207" [mapcar #[257 "\211:\203\334\211\242\243\211:\203\332\211\242\243\211:\203\326\211\242\243\211:\203\322\211\242\211:\203\316\211\242\211\300\267\266\202\314\243\243\211:\203P\211\242\243 \n \301BBBBBB\207\n\207\243\243\211:\203w\211\242\243 \n \301B\302\303BBBBBBB\207\n\207\243\243\211:\203\236\211\242\243 \n \301B\304\305BBBBBBB\207\n\207\243\243\211:\203\311\211\242\243 \n \301B\304\305\302\303 BBBBBBBBB\207\n\207\207\266\207\266\207\266\207\207\207" [#s(hash-table test eq purecopy t data (file+datetree 49 file+datetree+prompt 83 file+weektree 122 file+weektree+prompt 161)) file+olp+datetree :time-prompt t :tree-type week] 23 (#$ . 1083)] message "Deprecated date/weektree capture templates changed to `file+olp+datetree'."] 4 (#$ . 826)])#@13162 Templates for the creation of new entries. Each entry is a list with the following items: keys The keys that will select the template, as a string, characters only, for example "a" for a template to be selected with a single key, or "bt" for selection with two keys. When using several keys, keys using the same prefix key must be together in the list and preceded by a 2-element entry explaining the prefix key, for example ("b" "Templates for marking stuff to buy") The "C" key is used by default for quick access to the customization of the template variable. But if you want to use that key for a template, you can. description A short string describing the template, will be shown during selection. type The type of entry. Valid types are: entry an Org node, with a headline. Will be filed as the child of the target entry or as a top-level entry. Its default template is: "* %? %a" item a plain list item, will be placed in the first plain list at the target location. Its default template is: "- %?" checkitem a checkbox item. This differs from the plain list item only in so far as it uses a different default template. Its default template is: "- [ ] %?" table-line a new line in the first table at target location. Its default template is: "| %? |" plain text to be inserted as it is. target Specification of where the captured item should be placed. In Org files, targets usually define a node. Entries will become children of this node, other types will be added to the table or list in the body of this node. Most target specifications contain a file name. If that file name is the empty string, it defaults to `org-default-notes-file'. A file can also be given as a variable or as a function called with no argument. When an absolute path is not specified for a target, it is taken as relative to `org-directory'. Valid values are: (file "path/to/file") Text will be placed at the beginning or end of that file (id "id of existing Org entry") File as child of this entry, or in the body of the entry (file+headline "path/to/file" "node headline") Fast configuration if the target heading is unique in the file (file+olp "path/to/file" "Level 1 heading" "Level 2" ...) For non-unique headings, the full outline path is safer (file+regexp "path/to/file" "regexp to find location") File to the entry matching regexp (file+olp+datetree "path/to/file" "Level 1 heading" ...) Will create a heading in a date tree for today's date. If no heading is given, the tree will be on top level. To prompt for date instead of using TODAY, use the :time-prompt property. To create a week-tree, use the :tree-type property. (file+function "path/to/file" function-finding-location) A function to find the right location in the file (clock) File to the entry that is currently being clocked (here) The position of point (function function-finding-location) Most general way: write your own function which both visits the file and moves point to the right location template The template for creating the capture item. If it is an empty string or nil, a default template based on the entry type will be used (see the "type" section above). Instead of a string, this may also be one of: (file "/path/to/template-file") (function function-returning-the-template) in order to get a template from a file, or dynamically from a function. The rest of the entry is a property list of additional options. Recognized properties are: :prepend Normally newly captured information will be appended at the target location (last child, last table line, last list item...). Setting this property will change that. :immediate-finish When set, do not offer to edit the information, just file it away immediately. This makes sense if the template only needs information that can be added automatically. :jump-to-captured When set, jump to the captured entry when finished. :refile-targets When exiting capture mode via `org-capture-refile', the variable `org-refile-targets' will be temporarily bound to the value of this property. :empty-lines Set this to the number of lines that should be inserted before and after the new item. Default 0, only common other value is 1. :empty-lines-before Set this to the number of lines that should be inserted before the new item. Overrides :empty-lines for the number lines inserted before. :empty-lines-after Set this to the number of lines that should be inserted after the new item. Overrides :empty-lines for the number of lines inserted after. :clock-in Start the clock in this item. :clock-keep Keep the clock running when filing the captured entry. :clock-resume Start the interrupted clock when finishing the capture. Note that :clock-keep has precedence over :clock-resume. When setting both to t, the current clock will run and the previous one will not be resumed. :time-prompt Prompt for a date/time to be used for date/week trees and when filling the template. :tree-type When `week', make a week tree instead of the month-day tree. When `month', make a month tree instead of the month-day tree. :unnarrowed Do not narrow the target buffer, simply show the full buffer. Default is to narrow it so that you only see the new stuff. :table-line-pos Specification of the location in the table where the new line should be inserted. It should be a string like "II-3", meaning that the new line should become the third line before the second horizontal separator line. :kill-buffer If the target file was not yet visited by a buffer when capture was invoked, kill the buffer again after capture is finalized. :no-save Do not save the target file after finishing the capture. :hook A nullary function or list of nullary functions run before `org-capture-mode-hook' when the template is selected. :prepare-finalize A nullary function or list of nullary functions run before `org-capture-prepare-finalize-hook' when the template is selected. :before-finalize A nullary function or list of nullary functions run before `org-capture-before-finalize-hook' when the template is selected. :after-finalize A nullary function or list of nullary functions run before `org-capture-after-finalize-hook' when the template is selected. The template defines the text to be inserted. Often this is an Org mode entry (so the first line should start with a star) that will be filed as a child of the target headline. It can also be freely formatted text. Furthermore, the following %-escapes will be replaced with content and expanded: %[pathname] Insert the contents of the file given by `pathname'. These placeholders are expanded at the very beginning of the process so they can be used to extend the current template. %(sexp) Evaluate elisp `(sexp)' and replace it with the results. Only placeholders pre-existing within the template, or introduced with %[pathname] are expanded this way. Since this happens after expanding non-interactive %-escapes, those can be used to fill the expression. The evaluation happens with Org mode set as major mode in a temporary buffer. %<...> The result of `format-time-string' on the ... format specification. %t Time stamp, date only. The time stamp is the current time, except when called from agendas with `\[org-agenda-capture]' or with `org-capture-use-agenda-date' set. %T Time stamp as above, with date and time. %u, %U Like the above, but inactive time stamps. %i Initial content, copied from the active region. If there is text before %i on the same line, such as indentation, and %i is not inside a %(sexp), that prefix will be added before every line in the inserted text. %a Annotation, normally the link created with `org-store-link'. %A Like %a, but prompt for the description part. %l Like %a, but only insert the literal link. %L Like %l, but without brackets (the link content itself). %c Current kill ring head. %x Content of the X clipboard. %k Title of currently clocked task. %K Link to currently clocked task. %n User name (taken from the variable `user-full-name'). %f File visited by current buffer when `org-capture' was called. %F Full path of the file or directory visited by current buffer. %:keyword Specific information for certain link types, see below. %^g Prompt for tags, with completion on tags in target file. %^G Prompt for tags, with completion on all tags in all agenda files. %^t Like %t, but prompt for date. Similarly %^T, %^u, %^U. You may define a prompt like: %^{Please specify birthday}t. The default date is that of %t, see above. %^C Interactive selection of which kill or clip to use. %^L Like %^C, but insert as link. %^{prop}p Prompt the user for a value for property `prop'. A default value can be specified like this: %^{prop|default}p. %^{prompt} Prompt the user for a string and replace this sequence with it. A default value and a completion table can be specified like this: %^{prompt|default|completion2|completion3|...}. %^{prompt}X where X is one of g, G, t, T, u, U, C, or L. Same as %^X (see above), but also supply custom prompt/completions. Default value and completions as in %^{prompt|default|...}X are allowed. %? After completing the template, position cursor here. %\1 ... %\N Insert the text entered at the nth %^{prompt}, where N is a number, starting from 1. Apart from these general escapes, you can access information specific to the link type that is created. For example, calling `org-capture' in emails or in Gnus will record the author and the subject of the message, which you can access with "%:from" and "%:subject", respectively. Here is a complete list of what is recorded for each link type. Link type | Available information ------------------------+------------------------------------------------------ bbdb | %:type %:name %:company vm, wl, mh, mew, rmail, | %:type %:subject %:message-id gnus | %:from %:fromname %:fromaddress | %:to %:toname %:toaddress | %:fromto (either "to NAME" or "from NAME") | %:date %:date-timestamp (as active timestamp) | %:date-timestamp-inactive (as inactive timestamp) gnus | %:group, for messages also all email fields eww, w3, w3m | %:type %:url info | %:type %:file %:node calendar | %:type %:date When you need to insert a literal percent sign in the template, you can escape ambiguous cases with a backward slash, e.g., \%i.#@2 #@12 (fn S V)#@159 Hook that is run right before a capture process is finalized. The capture buffer is still current when this hook runs and it is widened to the entire buffer.#@91 Hook that is run right after a capture process is finalized. Suitable for window cleanup.#@100 Hook that is run before the finalization starts. The capture buffer is current and still narrowed.#@76 Plist for the current capture process, global, to avoid having to pass it. (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\316\323\330\322\323\331\332\333\257\334\322\323\335\336\333\337BBBBB\322\323\340\341\333\342BBBBB\322\323\343\344\333\345BBBBB\322\323\346\347\333\350BBBBB\322\323\351\352\333\353BBBBB\354BBBBBBBBBB\355BBBBBBB\257D& \210\300\356\302\303\357DD\360\306\307\361\362\314\363& \210\300\364\302\303\365DD\366\306\307\361\362\314\363& \210\300\367\302\303\370DD\371\306\307\361\362\314\363& \207" [custom-declare-variable org-capture-templates funcall function #[0 "\300\207" [nil] 1 (#$ . 15295)] (#$ . 2130) :group org-capture :package-version (Org . "9.7") :set #[514 "\300\301!\"\207" [set-default-toplevel-value org-capture-upgrade-templates] 6 (#$ . 15301)] :type repeat choice :value (#1="" #1# entry (file "~/org/notes.org") #1#) (list :tag "Multikey description" (string :tag "Keys ") (string :tag "Description")) list :tag "Template entry" (string :tag "Keys ") (string :tag "Description ") (choice :tag "Capture Type " :value entry (const :tag "Org entry" entry) (const :tag "Plain list item" item) (const :tag "Checkbox item" checkitem) (const :tag "Plain text" plain) (const :tag "Table line" table-line)) "Target location" "File" (const :format #1# file) (choice :tag "Filename " (file :tag "Literal") (function :tag "Function") (variable :tag "Variable")) (list :tag "ID" (const :format #1# id) (string :tag " ID")) "File & Headline" (const :format #1# file+headline) ((string :tag " Headline")) "File & Outline path" (const :format #1# file+olp) ((repeat :tag "Outline path" :inline t (string :tag "Headline"))) "File & Regexp" (const :format #1# file+regexp) ((regexp :tag " Regexp")) "File [ & Outline path ] & Date tree" (const :format #1# file+olp+datetree) ((option (repeat :tag "Outline path" :inline t (string :tag "Headline")))) "File & function" (const :format #1# file+function) ((function :tag " Function")) ((list :tag "Current clocking task" (const :format #1# clock)) (list :tag "Function" (const :format #1# function) (function :tag " Function"))) ((choice :tag "Template " (string) (list :tag "File" (const :format #1# file) (file :tag "Template file")) (list :tag "Function" (const :format #1# function) (function :tag "Template function"))) (plist :inline t :options (((const :format "%v " :prepend) (const t)) ((const :format "%v " :immediate-finish) (const t)) ((const :format "%v " :jump-to-captured) (const t)) ((const :format "%v " :empty-lines) (const 1)) ((const :format "%v " :empty-lines-before) (const 1)) ((const :format "%v " :empty-lines-after) (const 1)) ((const :format "%v " :clock-in) (const t)) ((const :format "%v " :clock-keep) (const t)) ((const :format "%v " :clock-resume) (const t)) ((const :format "%v " :time-prompt) (const t)) ((const :format "%v " :tree-type) (const week)) ((const :format "%v " :unnarrowed) (const t)) ((const :format "%v " :table-line-pos) (string)) ((const :format "%v " :kill-buffer) (const t))))) org-capture-before-finalize-hook #[0 "\300\207" [nil] 1 (#$ . 15295)] (#$ . 15318) :version "24.1" hook org-capture-after-finalize-hook #[0 "\300\207" [nil] 1 (#$ . 15295)] (#$ . 15481) org-capture-prepare-finalize-hook #[0 "\300\207" [nil] 1 (#$ . 15295)] (#$ . 15577)] 37) (defvar org-capture-plist nil (#$ . 15681))#@352 Local variable holding the plist in a capture buffer. This is used to store the plist for use when finishing a capture process because another such process might have changed the global variable by then. Each time a new capture buffer has been set up, the global `org-capture-plist' is copied to this variable, which is local in the indirect buffer. (defvar org-capture-current-plist nil (#$ . 19108))#@136 Local variable to store the value of the :clock-keep parameter. This is needed in case `org-capture-finalize' is called interactively. (defvar org-capture-clock-keep nil (#$ . 19517))#@85 Add ELEMENTS to the capture property list `org-capture-plist'. (fn &rest ELEMENTS) (defalias 'org-capture-put #[128 "\211\205\301\211A\262\242\211A\262\242#\202\207" [org-capture-plist plist-put] 6 (#$ . 19706)])#@287 Get PROPERTY from the capture property list `org-capture-plist'. When LOCAL is set, use the local variable `org-capture-current-plist', this is necessary after initialization of the capture process, to avoid conflicts with other active capture processes. (fn PROPERTY &optional LOCAL) (defalias 'org-capture-get #[513 "\302\203 \202\n \"\207" [org-capture-current-plist org-capture-plist plist-get] 5 (#$ . 19936)])#@137 Keymap for `org-capture-mode', a minor mode. Use this map to set additional keybindings for when Org mode is used for a capture buffer. (defvar org-capture-mode-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\207" [make-sparse-keymap define-key "" org-capture-finalize " " org-capture-kill "" org-capture-refile] 5) (#$ . 20364))#@45 Hook for the `org-capture-mode' minor mode. (defvar org-capture-mode-hook nil (#$ . 20732))#@101 Non-nil if Org-Capture mode is enabled. Use the command `org-capture-mode' to change this variable. (defvar org-capture-mode nil (#$ . 20830))#@696 Minor mode for special key bindings in a capture buffer. Turning on this mode runs the normal hook `org-capture-mode-hook'. This is a minor mode. If called interactively, toggle the `Org-Capture mode' mode. If the prefix argument is positive, enable the mode, and if it is zero or negative, disable the mode. If called from Lisp, toggle the mode if ARG is `toggle'. Enable the mode if ARG is nil, omitted, or is a positive number. Disable the mode if ARG is a negative number. To check whether the minor mode is enabled in the current buffer, evaluate the variable `org-capture-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (make-variable-buffer-local 'org-capture-mode) (defalias 'org-capture-mode #[256 "\303 \304=\203 ?\202\247\203\305W\203\306\202\307\310\301!\2031\311\300 \"\2031\300 B\312\302!\210\313\314!\315\316\203C\317\202D\320\"\210\321\322!\203g\303 \203X\211\303 \232\203g\323\324\325\203c\326\202d\327\330$\210\210\331 \207" [org-capture-mode local-minor-modes header-line-format current-message toggle 1 nil t boundp delq make-local-variable substitute-command-keys "\\Capture buffer. Finish `\\[org-capture-finalize]', refile `\\[org-capture-refile]', abort `\\[org-capture-kill]'." run-hooks org-capture-mode-hook org-capture-mode-on-hook org-capture-mode-off-hook called-interactively-p any message "%s %sabled%s" "Org-Capture mode" "en" "dis" " in current buffer" force-mode-line-update] 8 (#$ . 20979) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar org-capture-mode-hook nil) (byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\313\314\300!\205#\310\211%\207" [org-capture-mode-map org-capture-mode-hook variable-documentation put "Hook run after entering or leaving `org-capture-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode org-capture-mode " Cap" boundp] 6) (defvar org-capture-initial nil) (defvar org-capture-entry nil)#@80 Capture STRING with the template selected by KEYS. (fn STRING &optional KEYS) (defalias 'org-capture-string #[513 "\302!\303 *\207" [org-capture-entry org-capture-initial org-capture-select-template org-capture] 5 (#$ . 23204) "sInitial text: \n"])#@1279 Alist of capture templates and valid contexts. For example, if you have a capture template "c" and you want this template to be accessible only from `message-mode' buffers, use this: (setq org-capture-templates-contexts \='(("c" ((in-mode . "message-mode"))) ("d" (my-context-function (in-mode . "org-mode"))))) Here are the available contexts definitions: in-file: command displayed only in matching files in-mode: command displayed only in matching modes not-in-file: command not displayed in matching files not-in-mode: command not displayed in matching modes in-buffer: command displayed only in matching buffers not-in-buffer: command not displayed in matching buffers [function]: a custom function taking no argument If you define several checks, the agenda command will be accessible if there is at least one valid check. You can also bind a key to another capture template depending on contextual rules. (setq org-capture-templates-contexts \='(("c" "d" ((in-mode . "message-mode"))))) Here it means: in `message-mode buffers', use "c" as the key for the capture template otherwise associated with "d". (The template originally associated with "d" is not displayed to avoid duplicates.)#@152 Non-nil means use the date at point when capturing from agendas. When nil, you can still capture using the date at point with `\[org-agenda-capture]'.#@1261 Capture something. \ This will let you select a template from `org-capture-templates', and then file the newly captured information. The text is immediately inserted at the target location, and an indirect buffer is shown where you can edit it. Pressing `\[org-capture-finalize]' brings you back to the previous state of Emacs, so that you can continue your work. When called interactively with a `\[universal-argument]' prefix argument GOTO, don't capture anything, just go to the file/headline where the selected template stores its notes. With a `\[universal-argument] \[universal-argument]' prefix argument, go to the last note stored. When called with a `C-0' (zero) prefix, insert a template at point. When called with a `C-1' (one) prefix, force prompting for a date when a datetree entry is made. ELisp programs can set KEYS to a string associated with a template in `org-capture-templates'. In this case, interactive selection will be bypassed. If `org-capture-use-agenda-date' is non-nil, capturing from the agenda will use the date at point as the default date. Then, a `C-1' prefix will tell the capture process to use the HH:MM time of the day at point (if any) or the current HH:MM time. (fn &optional GOTO KEYS) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \210\300\314\302\303\315DD\316\310\311\306\307\312\317& \207" [custom-declare-variable org-capture-templates-contexts funcall function #[0 "\300\207" [nil] 1 (#$ . 15295)] (#$ . 23465) :version "24.3" :group org-capture :type (repeat (list :tag "Rule" (string :tag " Capture key") (string :tag "Replace by template") (repeat :tag "Available when" (choice (cons :tag "Condition" (choice (const :tag "In file" in-file) (const :tag "Not in file" not-in-file) (const :tag "In buffer" in-buffer) (const :tag "Not in buffer" not-in-buffer) (const :tag "In mode" in-mode) (const :tag "Not in mode" not-in-mode)) (regexp)) (function :tag "Custom function"))))) org-capture-use-agenda-date #[0 "\300\207" [nil] 1 (#$ . 15295)] (#$ . 24749) boolean] 10) (defalias 'org-capture #[512 "\203 \306=\203\307\310=!\311\267\202\312!\207\313 \207p\314\303!\203/ \203/\315\f\316\"\202<\3171:\320\321!0\202<\210\321 \206C\322!\321@\206R\323 \205R`\324 {\262\211;\203a\325\326G\327$\210;\203o\325\326G\330$\210\331\267\202}\332\333!\207\334\335!\207\336!\210\337 \210\340\341\342\343!\206\234\344\345!\205\234\346A\"@\347\343\n!\205\252\350\343 !!\316\n\351\n\352\353 \354\n\206\272\355 &\210\356\326=\205\306\357!\210\3601\326\340\361\362 \"0\210\202\350\363\364!\203\340\365\364!\210\366\367\370!\"\266\371\372!B\3731\376\374\371\375!@\376=!0\210\202-\377p!\203\201E\201F\201G \"\203\365p!\210\201H\371\352!!\210\366\201I\371\201J!\370!#\266\201K\201L!\203p\371\201M!\203p\201N1o\201O \203X\340\201P\201QC!\"\210\201R \210\201S\201D!\210\201QC!\211D0\210\371\201T!\205|\201U \207" [org-capture-use-agenda-date major-mode org-overriding-default-time org-capture-link-is-already-stored org-store-link-plist org-capture-entry org-agenda-mode org-get-cursor-date 1 #s(hash-table test equal purecopy t data ((4) 22 (16) 26)) org-capture-goto-target org-capture-goto-last-stored boundp plist-get :annotation (error) org-store-link nil org-capture-select-template org-region-active-p mark remove-text-properties 0 (read-only t) (read-only t) #s(hash-table test equal purecopy t data ("C" 117 "q" 121)) customize-variable org-capture-templates user-error "Abort" org-capture-set-plist org-capture-get-template org-capture-put :original-buffer :original-file buffer-file-name featurep dired rassq :original-file-nondirectory file-name-nondirectory :initial :return-to-wconf current-window-configuration :default-time org-current-time org-capture-set-target-location here (error quit) :template org-capture-fill-template get-buffer "*Capture*" kill-buffer error "Capture abort: %s" error-message-string org-capture-get :clock-keep (error quit) org-capture-place-template :target function buffer-base-buffer org-capture-initial dired-buffers org-capture-clock-keep org-clock-marker org-capture-clock-was-started string-prefix-p "CAPTURE-" buffer-name set-window-configuration "Capture template `%s': %s" :key derived-mode-p org-mode :clock-in (error) org-clock-is-active :interrupted-clock copy-marker org-clock-in make-local-variable :immediate-finish org-capture-finalize] 21 (#$ . 24907) "P"])#@58 Get the template from a file or a function if necessary. (defalias 'org-capture-get-template #[0 "\301\302\303\302!\211\204\210\304\202\217\211;\204\217\211:\203\215\211\242\211\305\267\266\202\211\243\211:\203R\211\242\243\211\204L\306\"\307!\203C\310!\266\206\202\217\311\312\"\266\206\202\217\266\313\202\217\266\313\202\217\243\211:\203\203\211\242\243\211\204}\314!\203t \266\205\202\217\311\315\"\266\205\202\217\266\313\202\217\266\313\202\217\313\202\217\210\313\"\207" [org-directory org-capture-put :template org-capture-get "" #s(hash-table test eq purecopy t data (file 34 function 88)) expand-file-name file-exists-p org-file-contents format "* Template file %S not found" "* Invalid capture template" functionp "* Template function %S not found"] 11 (#$ . 29402)])#@218 Run functions associated with KEYWORD on template's plist. For valid values of KEYWORD see `org-capture-templates'. If LOCAL is non-nil use the buffer-local value of `org-capture-plist'. (fn KEYWORD &optional LOCAL) (defalias 'org-capture--run-template-functions #[513 "\300\"\301!\203 \211 \207\302\303\"\207" [org-capture-get functionp mapc funcall] 6 (#$ . 30225)])#@165 Finalize the capture process. With prefix argument STAY-WITH-CAPTURE, jump to the location of the captured item after finalizing. (fn &optional STAY-WITH-CAPTURE) (defalias 'org-capture-finalize #[256 "\306\307!\203\210\310\203\311p!\204\312\313!\210\314\315\316\"\210\317\320!\210  \203\262\f \232\203\262 \2036\321\310!\210\202\262\322@\323 )\210\306\324\316\"\203\262\325\306\326\316\"!\203\262\327\330\306\326\316\"!!\203\262\306\326\316\"\211\212\325!\203l\330!q\210\202\236\247\204\236\331!\211\332\267\202\204\210\322\202\236\210\322\202\236A@@\333=\203\226\210A@A@\202\236\334A@\333\"\262\211\203\262\211\335H\211\336=?\205\255\211\266\202\202\323\331!\211\337\267\202\313\266\202;\340\341\342#\266\202\202\323\334A@\342\"\266\202\203;\331!\211\343\267\202\351\210\322\202\210\322\202A@@\333=\203\373\210A@A@\202\334A@\333\"\262\211\203\211\335H\211\336=?\205\211\266\202\2029\331!\211\344\267\2021\266\322\2029\340\341\342#\266\202\2029\334A@\342\"\266\202q\210\331!\211\345\267\202N\210\322\202h\210\322\202hA@@\333=\203`\210A@A@\202h\334A@\333\"\262\211\203|\211\341H\211\336=?\205w\211\266\203\202\236\331!\211\346\267\202\226\266\322\202\236\340\341\347#\266\203\202\236\334A@\347\"\266\203\212\214~\210\211\206\247`b\210\350 +\266\351\352!\210\322\353\354deZ\"\210~\210\353\355`\"\210A\203\355\306\356\316\"\306\357\316\"\203\326\211\204\334\266\360\202i\310\262\212\214~\210\361\"*\266\202i\362\363!\203W\212\3641\376\365 0\202\210\202 \203 \366 \210\367 \210)\306\370\316\"\371=\203W\372 \203W\373 \204%\374 \210\202W\306\375!\2047B\2037B\376!\203O\377\201C\322\201D S\201E\306\356\316\"\306\357\316\"\"$\210\201F\201G!\210\201H \210\314\201I\316\"\210\317\201J!\210\306\201K!\203\212\306\201K!b\210\201L )\210\306\201M!\204\214\201N \210\306\201O\316\"\306\201P\316\"\306\201Q\316\"\311p!\201Rp!\210r\306\342!q\210\306\201S!\306\201T!\306\355!\306\354!\204\307~\266\202@W\203\333\211@\\A\\}\210\202\363AV\203\353@A}\210\202\363@A\\}\210@W\203\211\\b\266\202W\203\211\\\202b\266)\211\2034A\2034\2034r\211q\210\201U\322!\210\201R )\210\202P\211\203P\203P\203Pr\211q\210\201N )\210\201R!\210\201V!\266\314\201W!\210\317\201X!\210\211\203\201\211\201Y\267\202\212\351\201Z!\210\202\212\312\201[!\210\202\212\203\212\201\\ \210?\207" [org-capture-mode org-capture-current-plist org-capture-plist org-capture-clock-was-started org-clock-marker org-capture-clock-keep org-capture-get :jump-to-captured t buffer-base-buffer error "This does not seem to be a capture buffer for Org mode" org-capture--run-template-functions :prepare-finalize local run-hooks org-capture-prepare-finalize-hook org-clock-update-mode-line nil org-clock-out :clock-resume markerp :interrupted-clock buffer-live-p marker-buffer org-element-type #s(hash-table test eq purecopy t data (nil 122 plain-text 127)) :standard-properties plist-get 14 org-element-ast--nil #s(hash-table test eq purecopy t data (nil 187 plain-text 192)) get-text-property 0 :buffer #s(hash-table test eq purecopy t data (nil 223 plain-text 228)) #s(hash-table test eq purecopy t data (nil 288 plain-text 294)) #s(hash-table test eq purecopy t data (nil 324 plain-text 329)) #s(hash-table test eq purecopy t data (nil 389 plain-text 395)) :begin org-clock-in message "Interrupted clock has been resumed" org-capture-put :captured-entry-size :insertion-point :begin-marker :end-marker dirty kill-region derived-mode-p org-mode (error) org-back-to-heading org-update-parent-todo-statistics org-update-checkbox-count :type table-line org-at-table-p org-table-get-stored-formulas org-table-align :immediate-finish "Fix formulas? " org-table-fix-formulas org-log-note-clock-out org-note-abort org-table-fix-formulas-confirm "@" org-table-current-dline count-lines org-table-recalculate all org-capture-store-last-position :before-finalize org-capture-before-finalize-hook :decrypted org-encrypt-entry :no-save save-buffer :return-to-wconf :new-buffer :kill-buffer kill-buffer :initial-target-region :initial-target-position set-buffer-modified-p set-window-configuration :after-finalize org-capture-after-finalize-hook #s(hash-table test eq purecopy t data (clean 879 dirty 888)) "Capture process aborted and target buffer cleaned up" "Capture process aborted, but target buffer could not be cleaned up correctly" org-capture-goto-last-stored] 13 (#$ . 30606) "P"])#@205 Finalize the current capture and then refile the entry. Refiling is done from the base buffer, because the indirect buffer is then already gone. Any prefix argument will be passed to the refile command. (defalias 'org-capture-refile #[0 "\302\303\304\"\305=\204 \306\307!\210\310 \206p\311 \312\302\313\304\"\302\314\304\"\302\315\304\"\212\316\312!\210`)\223\210\317\313\320\314\320$\210\211\206; \321 \210\322 \323\324\"\216rq\210\212\325!\203\\\326!q\210\202\235\247\204\235\327!\211\330\267\202u\210\320\202\221\210\320\202\221A@@\331=\203\210\210A@A@\202\221\332A@\331\"\262\211\203\245\211\333H\211\334=?\205\240\211\266\202\202\310\327!\211\335\267\202\277\266\2025\336\337\340\n#\266\202\202\310\332A@\340\"\266\202\2035\327!\211\341\267\202\337\210\320\202\373\210\320\202\373A@@\331=\203\362\210A@A@\202\373\332A@\331\"\262\211\203\211\333H\211\334=?\205\n\211\266\202\2023\327!\211\342\267\202*\266\320\2023\336\337\340\n#\266\202\2023\332A@\340\"\266\202q\210\327!\211\343\267\202I\210\320\202e\210\320\202eA@@\331=\203\\\210A@A@\202e\332A@\331\"\262\211\203y\211\337H\211\334=?\205t\211\266\203\202\235\327!\211\344\267\202\224\266\320\202\235\336\337\345\n#\266\203\202\235\332A@\345\"\266\203\212\214~\210\211\206\246`b\210\346\347!.\266\203\277rq\210\350 )\210\351!\210\205\305\352 )\207" [org-capture-is-refiling org-refile-targets org-capture-get :type local entry user-error "Refiling from a capture buffer makes only sense for `entry'-type templates" buffer-base-buffer make-marker t :kill-buffer :jump-to-captured :refile-targets org-back-to-heading org-capture-put nil org-capture-finalize current-window-configuration make-closure #[0 "\301\300!\207" [V0 set-window-configuration] 2] markerp marker-buffer org-element-type #s(hash-table test eq purecopy t data (nil 107 plain-text 112)) :standard-properties plist-get 14 org-element-ast--nil #s(hash-table test eq purecopy t data (nil 175 plain-text 180)) get-text-property 0 :buffer #s(hash-table test eq purecopy t data (nil 213 plain-text 218)) #s(hash-table test eq purecopy t data (nil 281 plain-text 287)) #s(hash-table test eq purecopy t data (nil 319 plain-text 324)) #s(hash-table test eq purecopy t data (nil 387 plain-text 393)) :begin call-interactively org-refile save-buffer kill-buffer org-capture-goto-last-stored] 13 (#$ . 35144) nil])#@36 Abort the current capture process. (defalias 'org-capture-kill #[0 "\302\303\304 *\207" [org-capture-before-finalize-hook org-note-abort t nil org-capture-finalize] 2 (#$ . 37582) nil])#@60 Go to the location where the last capture note was stored. (defalias 'org-capture-goto-last-stored #[0 "\302\303 \304\"\"\210\305\306!\207" [org-capture-last-stored-marker org-bookmark-names-plist org-goto-marker-or-bmk plist-get :last-capture message "This is the last note stored by a capture process"] 5 (#$ . 37775) nil])#@50 Store the initial region with `org-capture-put'. (defalias 'org-capture-put-target-region-and-position #[0 "\300\301deZ\302 U?\205edB\"\210\300\303`\"\207" [org-capture-put :initial-target-region buffer-size :initial-target-position] 4 (#$ . 38107)])#@98 Find TARGET buffer and position. Store them in the capture property list. (fn &optional TARGET)#@11 (fn ID) (defalias 'org-capture-set-target-location #[256 "\306\212\307\206\n\310\311!\211\312\235\203\313\314`\315\306$\266\202\242\211:\203\234\211\242\211\316\267\202\223\243\211:\203P\211\242\243\211\204F\317!q\210\320 \210~\266\321\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211:\203\245\211\242\211;\203\243\211\204u!\266\202\242\322\323\"\266\202\242\2119\203\234\243\211\204\222!\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211:\2031\211\242\243\211:\203'\211\242\211;\203\243\211\204\317!q\210\324\325!\204\340\326\327\330p\"!\210\325 \210\320 \210~\210eb\210\331\327\332!\"\321\306#\203\374\333y\266 \202\242db\210n\204\334c\210\335\334\261\210\336y\266 \202\242\322\323\"\266 \202\242\322\323\"\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211:\203p\211\242\243\211\203f\337\340!B!\341!q\210\320 \210~\210\211b\210\211\321\211\223\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211:\203\363\211\242\243\211:\203\351\211\242\211;\203\337\243\211\204\325\317!q\210\320 \210~\210eb\210\331\321\306#\204\264\322\342\"\266 \202\242\310\343!\203\277\333\224\202\301\333\225b\210\313\314`\"\210\324\325!\205\320\344 \266\211\202\242\322\323\"\266 \202\242\322\323\"\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211:\203\250\211\242\243\211\203\337\340!B!\202\317!q\210\345 \341!q\210\320 \210~\210\211b\210\211\321\211\223\210\346\347!\210\320 \210~\210\310\350!\211\351\267\210\202K\210\352\202L\210\353\202L\354\355 \203W\356 !\202\234\310\357!\204c\n\360=\203\232\321\211\361\321\306\321\362$\313\363 \204|\356!\364 U\203\200\202\217\365\366\367\333\211 \370 !AAA%!\"\210\356!*\262\202\234\364 !\205\242\371\"\266\202\242\322\323\"\266\202\242\243\211:\203\f\211\242\243\211:\203\211\242\372!\203\370\243\211\204\356\317!q\210\320 \210~\210 \210\313\314`\"\210\324\325!\205\351\344 \266\211\202\242\322\323\"\266 \202\242\322\323\"\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211:\203R\211\242\372!\203I\243\211\204? \210\313\314`\"\210\324\325!\205:\344 \266\207\202\242\322\323\"\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\243\211\204\212\373@!\203\202\341@!\203\202\341@!q\210\320 \210~\210@b\266\202\242\374\375!\266\202\242\322\323\"\266\202\242\322\323\"\266\202\242\322\323\"\266\313\376p\377`\201A\201B\201C\201D!\205\320\201E \205\320\212\201F \210\201G\306!\205\317`)&)\207" [org-complex-heading-regexp-format org-overriding-default-time current-prefix-arg org-time-was-given org-end-time-was-given org-extend-today-until t #[257 "\300!\211:\203\211\242\243\301!q\210~\210\302 \210\211b\207\303\304\"\207" [org-id-find org-capture-target-buffer org-capture-put-target-region-and-position error "Cannot find target ID \"%s\""] 6 (#$ . 38467)] org-capture-get :target ((here) here) org-capture-put :exact-position :insert-here #s(hash-table test eq purecopy t data (file 40 id 89 file+headline 174 file+olp 314 file+regexp 377 file+olp+datetree 508 file+function 689 function 789 clock 859)) org-capture-target-buffer org-capture-put-target-region-and-position nil error "Invalid capture target specification: %S" derived-mode-p org-mode org-display-warning format "Capture requirement: switching buffer %S to Org mode" re-search-forward regexp-quote 0 "\n" "* " -1 org-find-olp org-capture-expand-file marker-buffer "No match for target regexp in file %s" :prepend org-at-heading-p point-marker require org-datetree :tree-type #s(hash-table test eq purecopy t data (week 577 month 582)) org-datetree-find-iso-week-create org-datetree-find-month-create org-datetree-find-date-create calendar-gregorian-from-absolute time-to-days :time-prompt 1 org-read-date "Date for tree entry:" :default-time org-today encode-time apply list decode-time subtree-at-point functionp markerp user-error "No running clock that could be used as capture target" :buffer :pos org-clock-hd-marker :target-entry-p :decrypted featurep org-crypt org-at-encrypted-entry-p org-decrypt-entry org-back-to-heading] 23 (#$ . 38365)])#@392 Expand functions, symbols and file names for FILE. When FILE is a function, call it. When it is a form, evaluate it. When it is a variable, return its value. When it is a string, treat it as a file name, possibly expanding it according to `org-directory', and return it. If it is the empty string, however, return `org-default-notes-file'. In any other case, raise an error. (fn FILE) (defalias 'org-capture-expand-file #[257 "\211\302\232\203\n\2022\211;\203\303 \"\2022\304!\203!\211 \2022\2119\2031\305!\2031\211J\2022\306\307!\206<\310\311\"\207" [org-default-notes-file org-directory "" expand-file-name functionp boundp nil org-string-nw-p error "Invalid file location: %S"] 5 (#$ . 42769)])#@113 Get a buffer for FILE. FILE is a generalized file location, as handled by `org-capture-expand-file'. (fn FILE) (defalias 'org-capture-target-buffer #[257 "\300!\301!\206\302\303\304\"\210\305!\207" [org-capture-expand-file org-find-base-buffer-visiting org-capture-put :new-buffer t find-file-noselect] 5 (#$ . 43496)])#@215 Insert the template at the target location, and display the buffer. When INHIBIT-WCONF-STORE is non-nil, don't store the window configuration, as it may have been stored before. (fn &optional INHIBIT-WCONF-STORE) (defalias 'org-capture-place-template #[256 "\211\204\n\303\304\305 \"\210\306\307\310\311!\312\"\313\"\210~\210\314 \210\310\315!b\210\316\300!\210\317\310\320!\211\321\267\210\202N\322 \266\202N\323 \266\202N\324 \266\202N\325 \266\202N\325 \266\316\302!\210 \326\327\330\"\210\331\332!\207" [outline-level org-capture-plist org-capture-current-plist org-capture-put :return-to-wconf current-window-configuration pop-to-buffer org-capture-get-indirect-buffer org-capture-get :buffer "CAPTURE" (org-display-buffer-split) org-fold-show-all :pos make-local-variable org-outline-level :type #s(hash-table test eq purecopy t data (entry 46 nil 46 table-line 53 plain 60 item 67 checkitem 74)) org-capture-place-entry org-capture-place-table-line org-capture-place-plain-text org-capture-place-item org-capture--run-template-functions :hook local org-capture-mode 1] 5 (#$ . 43828)])#@40 Place the template as a new Org entry. (defalias 'org-capture-place-entry #[0 "\306\307!\306\310!\306\311!\306\312!\313\314!\210\203b\210\203@\315\316 \2044\3171/\212\320\321!)0\2021\210\322\2039\323 \202:\313!\262\202\231\306\324!\203h\315\316 \203Q\323 \202R\313\313\"\262\203`\325 \210\202\231\326\321\211\"\210\202\231\203zeb\210\316 \204\231\325 \210\202\231db\210\322\211\327 \204\221p>\204\221pC\262\202^\330\300\327 \206\231p\"\327 \206\240p\330\300\327 \206\250p\"B\211\203E\211@\331!\203\277\211B\262\210\202A\322\330\302\206\307p\"\206\332r\211\206\321pq\210\332\333 \"\211)\262\211\203?\211@\211\334\211\335!\262?\205\363\336\337\"\266\340 >\203\211\334=\203\266\202;\341 >\205\211\342=?\205\211\335! \236\236A\266\202\204:\343B\f\"\203:\321B\262\343B\f\"B\262\210A\202\334\266A\202\252\210\203]r\327 \206Qpq\210\344\300!\210\345\331\")\210\211\203\227\211@r\211q\210\203\210\346 \321\2115\3216\347\350\"\216\214~\210\351ed#-\266\352\313dS]d\322#)\266A\202_\266\353 n\204\242\354c\210\355 \210`\214\203\257\211}\210\356\357#)\210\360!\210\361 \210\316 \204\306\325 \210\362`\"\210\363m\203\325`\202\327`S\"\210\364`\"\207" [org-fold-core--indirect-buffers org-fold-core--specs org-fold-core--spec-list org-fold-core--optimise-for-huge-buffers org-fold-core--property-symbol-cache buffer-undo-list org-capture-get :template :prepend :exact-position :insert-here 1 org-capture-verify-tree org-get-valid-level org-at-heading-p (error) org-back-to-heading t nil org-outline-level :target-entry-p outline-next-heading org-end-of-subtree buffer-base-buffer buffer-local-value buffer-live-p mapcar car :global org-fold-core-get-folding-spec-from-alias error "%s is not a valid folding spec" ignore-indirect merge-folds :visible gethash make-local-variable seq-filter buffer-modified-p make-closure #[0 "\300\301>\205 \302\300!\207" [V0 (nil autosaved) restore-buffer-modified-p] 2] remove-text-properties org-fold-region point-marker "\n" org-capture-empty-lines-before org-paste-subtree for-yank org-capture-position-for-last-stored org-capture-empty-lines-after org-capture-mark-kill-region org-capture-narrow org-capture--position-cursor inhibit-read-only inhibit-modification-hooks] 19 (#$ . 44940)])#@46 Place the template as a new plain list item. (defalias 'org-capture-place-item #[0 "\304\305!\306\304\307!!\310\311\312\211 \"\n\"\206S\n\313=\203\314\2023\n\315U\203(\316\2023\n\317U\2032\320\2023\314 \203;\321\202<\322\323\324\325\260\326 \326\312 \"\n##\266\202P\310\327\313$\266\203\204m\330\331\332\333\334\"\335#P\262\304\336!\203\331\304\336!\212\337!\203\205\340!q\210\202\264\211\247\204\264\341!\211\342\267\202\235\210\310\202\267\210\310\202\267A@@\343=\203\257\210\211A@A@\202\267\312A@\343\"\262\211\203\313\211\344H\211\345=?\205\306\211\266\202\202\353\341!\211\346\267\202\343\266\202R\347\350\351#\266\202\202\353\312A@\351\"\266\202\203R\341!\211\352\267\202\210\310\202\210\310\202A@@\343=\203\210\211A@A@\202\312A@\343\"\262\211\203/\211\344H\211\345=?\205*\211\266\202\202P\341!\211\353\267\202H\266\310\202P\347\350\351#\266\202\202P\312A@\351\"\266\202q\210\341!\211\354\267\202e\210\310\202\210\310\202A@@\343=\203w\210\211A@A@\202\312A@\343\"\262\211\203\223\211\350H\211\345=?\205\216\211\266\203\202\264\341!\211\355\267\202\254\266\310\202\264\347\350\356#\266\203\202\264\312A@\356\"\266\203\212\214~\210\211\206\275`b\210\357 \304\360!\203\314\357 \202\322\212\361 \210`)+B\262\202\357\304\362!\203\354\357\363!\212\361 \210`)B\202\357edB\211\242\243b\210\364\312\211 \"\n\"\206@\n\313=\203 \314\202 \n\315U\203\316\202 \n\317U\203\320\202 \314 \203(\321\202)\322\323\324\325\260\326 \326\312 \"\n##\266\202P\3652\231\366\313#\203s\367\370 \371\313#\211\262\203E\372\203c\373\202d\374\310\211$b\210\375\365\313\"\210\202E\304\360!\203}\202\227\204\206\202\227\376 \203\217\202\227\212\377 \210`)]b0\266\201@ n\204\246\334c\210\203\256\204\321\201A\205\317?\205\317\201B\304\201C!\206\316\304\201D!\206\316\350^!\210\201E`!\210\357 \310\201F\203\350\201G\202\353\201H\322\201F\201I\322##\266\202\334\261\210\201@ \203x\212\201J!b\210\310\201K *\212b\210\212`W\203(\211j\210\310y\210\202)\203q\372\201L\310\211$\201M=\211\201N\310\327\313$\266\203\204S\262\202[\211?\205Y\266\202\203p\201O\203k\201P\202n\201Q!\210\210\201R )\266\203\200\203\243\201S\205\241\205\241\201B\304\201T!\206\240\304\201D!\206\240\350^!\210\201U`\"\210\201VS\"\210\201W\"\207" [org--item-re-cache org-list-allow-alphabetical org-plain-list-ordered-item-terminator buffer-invisibility-spec org-capture-get :prepend org-remove-indentation :template nil "\\`" plist-get t "[.)]" 41 ")" 46 "\\." "\\|[A-Za-z]" "" "\\([ ]*\\([-+]\\|\\(\\([0-9]+" "\\)" "\\)\\)\\|[ ]+\\*\\)\\([ ]+\\|$\\)" plist-put string-match "- " mapconcat identity split-string "\n" "\n " :exact-position markerp marker-buffer org-element-type #s(hash-table test eq purecopy t data (nil 147 plain-text 152)) :standard-properties 14 org-element-ast--nil #s(hash-table test eq purecopy t data (nil 212 plain-text 217)) get-text-property 0 :buffer #s(hash-table test eq purecopy t data (nil 247 plain-text 252)) #s(hash-table test eq purecopy t data (nil 312 plain-text 318)) #s(hash-table test eq purecopy t data (nil 347 plain-text 352)) #s(hash-table test eq purecopy t data (nil 412 plain-text 418)) :begin line-beginning-position :insert-here outline-next-heading :target-entry-p 2 "^" :found re-search-forward org-element-lineage org-element-at-point plain-list org-element--property :post-affiliated :contents-end throw org-before-first-heading-p org-end-of-meta-data point-marker org-capture-empty-lines-before 1 :empty-lines-before :empty-lines org-capture-position-for-last-stored replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'" org-element-post-affiliated current-indentation :type ordered "\\`[A-Za-z0-9]\\([.)]\\)" org-cycle-list-bullet "1." "-" org-list-repair org-capture-empty-lines-after :empty-lines-after org-capture-mark-kill-region org-capture-narrow org-capture--position-cursor] 17 (#$ . 47268)])#@37 Place the template as a table line. (defalias 'org-capture-place-table-line #[0 "\304\305!\210\306\307!\310\311\203\312\202\313\314\311\315\314##\266\202\310\316\317$\266\203\203/\210\320\2024\211\321P\262\306\322!\310\211\306\323!\203\245\306\323!\212\324!\203Q\325!q\210\202\200\211\247\204\200\326!\211\327\267\202i\210\310\202\203\210\310\202\203A@@\330=\203{\210\211A@A@\202\203\331A@\330\"\262\211\203\227\211\332H\211\333=?\205\222\211\266\202\202\267\326!\211\334\267\202\257\266\202\335\336\337#\266\202\202\267\331A@\337\"\266\202\203\326!\211\340\267\202\315\210\310\202\347\210\310\202\347A@@\330=\203\337\210\211A@A@\202\347\331A@\330\"\262\211\203\373\211\332H\211\333=?\205\366\211\266\202\202\326!\211\341\267\202\266\310\202\335\336\337#\266\202\202\331A@\337\"\266\202q\210\326!\211\342\267\2021\210\310\202K\210\310\202KA@@\330=\203C\210\211A@A@\202K\331A@\330\"\262\211\203_\211\336H\211\333=?\205Z\211\266\203\202\200\326!\211\343\267\202x\266\310\202\200\335\336\344#\266\203\202\200\331A@\344\"\266\203\212\214~\210\211\206\211`b\210\345 \262\306\346!\203\231\202\237\212\347 \210`)+\266\202\202\277\306\350!\204\262\266ed\202\277\345\351!\262\212\347 \210`)\262b\210\3522\f\353 \317#\203\367\354\355 \356\317#\211\203\363\357\360\310\211$\361=\204\363\362!b\210\363!`}\210\364\352\317\"\210\210\202\306\211b\210n\204\321c\210\365 \366c\210\211`}\2620\210\306\346!\204\227\203g\316\367\"\203geb\210\3701<\371 \372\373\"\216\374 )\266\n\375\225\375\224ZH0\202B\376\377\"\262\201@\201A\351\"!\\\336W\203Z\336\202]\201B\\y\210\310y\266\202\227\306\201C!\203\221eb\210\353 \310\317#\203\227\353 \310\317#\203\210\336y\210\202\227\201D b\210\202\227\201D b\210\365 n\204\240\321c\210`\212c\210`)\201E\201F!\210\201G\"\210\201HS\"\210\201IS\"\207" [org-table-border-regexp org-table-dataline-regexp org-table-hlines org-table-hline-regexp require org-table org-capture-get :template nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" string-match t "| %?Bad template |" "\n" :table-line-pos :exact-position markerp marker-buffer org-element-type #s(hash-table test eq purecopy t data (nil 95 plain-text 100)) :standard-properties plist-get 14 org-element-ast--nil #s(hash-table test eq purecopy t data (nil 160 plain-text 165)) get-text-property 0 :buffer #s(hash-table test eq purecopy t data (nil 195 plain-text 200)) #s(hash-table test eq purecopy t data (nil 260 plain-text 266)) #s(hash-table test eq purecopy t data (nil 295 plain-text 300)) #s(hash-table test eq purecopy t data (nil 360 plain-text 366)) :begin line-beginning-position :insert-here outline-next-heading :target-entry-p 2 :found re-search-forward org-element-lineage org-element-at-point table org-element--property :type table.el org-element-contents-end org-element-post-affiliated throw point-marker "| |\n|---|\n" "\\(I+\\)\\([-+][0-9]+\\)" (error) match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] org-table-analyze 1 error "Invalid table line specification %S" string-to-number match-string -1 :prepend org-table-end org-capture-position-for-last-stored table-line org-capture-mark-kill-region org-capture-narrow org-capture--position-cursor] 11 (#$ . 51335)])#@277 Place the template plainly. If the target locator points at an Org node, place the template into the text of the entry, before the first child. If not, place the template at the beginning or end of the file. Of course, if exact position has been required, just put it there. (defalias 'org-capture-place-plain-text #[0 "\300\301!\203\300\301!b\210\2024\300\302!\203'\300\303!\203!\304\305!\210\2024\306 \210\2024\300\303!\2031e\2022db\210\307 n\204=\310c\210\311 \210\312`!\210`\300\313!c\210n\204Q\310c\210\211`S]\314 \210\315`\"\210\316\"\210\317\"\207" [org-capture-get :exact-position :target-entry-p :prepend org-end-of-meta-data t outline-next-heading point-marker "\n" org-capture-empty-lines-before org-capture-position-for-last-stored :template org-capture-empty-lines-after org-capture-mark-kill-region org-capture-narrow org-capture--position-cursor] 6 (#$ . 54706)])#@80 Mark region between BEG and END to be killed on aborted capture. (fn BEG END) (defalias 'org-capture-mark-kill-region #[514 "\300!\300\301\"\302\303\"\210\302\304\"\207" [copy-marker t org-capture-put :begin-marker :end-marker] 7 (#$ . 55607)])#@86 Put POSITION on `org-capture-plist' for future use as `last capture`. (fn POSITION) (defalias 'org-capture-position-for-last-stored #[257 "\211\250\203\300\301\302 \303p!\206p\223\"\207\211\304=\203\"\300\301\304\305 D\"\207\306\307!\207" [org-capture-put :position-for-last-stored make-marker buffer-base-buffer table-line org-table-current-dline error "This should not happen"] 7 (#$ . 55862)])#@35 Store the last-captured position. (defalias 'org-capture-store-last-position #[0 "\303\304\305\"\306!\203\307!\310\211\223\210\2024\211<\2054\211@\311=\2054\312 \2033\212\313A@!\210\314 )\2024`r\315p!q\210\211\212\306!\203J\316!q\210\202|\247\204|\317!\211\320\267\202b\210\310\202|\210\310\202|A@@\321=\203t\210A@A@\202|\322A@\321\"\262\211\203\220\211\323H\211\324=?\205\213\211\266\202\202\261\317!\211\325\267\202\251\266\202\326\327\330#\266\202\202\261\322A@\330\"\266\202\203\317!\211\331\267\202\307\210\310\202\341\210\310\202\341A@@\321=\203\331\210A@A@\202\341\322A@\321\"\262\211\203\365\211\323H\211\324=?\205\360\211\266\202\202\317!\211\332\267\202\266\310\202\326\327\330#\266\202\202\322A@\330\"\266\202q\210\317!\211\333\267\202,\210\310\202F\210\310\202FA@@\321=\203>\210A@A@\202F\322A@\321\"\262\211\203Z\211\327H\211\324=?\205U\211\266\203\202|\317!\211\334\267\202t\266\310\202|\326\327\335#\266\203\202|\322A@\335\"\266\203\212\214~\210\211\206\205`b\210\203\247\322 \336\"\211\203\246\3371\240\340!0\266\202\247\341\342\"\266\210\n`\310\223,\207" [org-capture-bookmark org-bookmark-names-plist org-capture-last-stored-marker org-capture-get :position-for-last-stored local markerp marker-position nil table-line org-at-table-p org-table-goto-line line-beginning-position buffer-base-buffer marker-buffer org-element-type #s(hash-table test eq purecopy t data (nil 88 plain-text 93)) :standard-properties plist-get 14 org-element-ast--nil #s(hash-table test eq purecopy t data (nil 153 plain-text 158)) get-text-property 0 :buffer #s(hash-table test eq purecopy t data (nil 189 plain-text 194)) #s(hash-table test eq purecopy t data (nil 254 plain-text 260)) #s(hash-table test eq purecopy t data (nil 290 plain-text 295)) #s(hash-table test eq purecopy t data (nil 355 plain-text 361)) :begin :last-capture (error) bookmark-set message "Bookmark set error: %S"] 9 (#$ . 56271)])#@133 Possibly narrow to region between BEG and END. If configuration contains non-nil :unnarrowed property, do not narrow. (fn BEG END) (defalias 'org-capture-narrow #[514 "\300\301!?\205\n}\207" [org-capture-get :unnarrowed] 4 (#$ . 58277)])#@158 Move point to first "%?" location or at start of template. BEG and END are buffer positions at the beginning and end position of the template. (fn BEG END) (defalias 'org-capture--position-cursor #[514 "b\210\300\301\302#\205\303\304!\207" [search-forward "%?" t replace-match ""] 6 (#$ . 58525)])#@205 Insert N empty lines before the insertion point. Point will be after the empty lines, so insertion can directly be done. If N is nil, :empty-lines-before or :empty-lines are considered. (fn &optional N) (defalias 'org-capture-empty-lines-before #[256 "\211\206\300\301!\206\300\302!\206\303\262`\304 \210`|\210\303V\205$\305!\207" [org-capture-get :empty-lines-before :empty-lines 0 org-back-over-empty-lines newline] 4 (#$ . 58834)])#@209 Set the correct number of empty lines after the inserted string. Point will remain at the first line after the inserted text. If N is nil, :empty-lines-after or :empty-lines are considered. (fn &optional N) (defalias 'org-capture-empty-lines-after #[256 "\211\206\300\301!\206\300\302!\206\303\262\304 \210\305\306!\203#\307\310!\210\202`\303V\203.\311!\210\211b\207" [org-capture-get :empty-lines-after :empty-lines 0 org-back-over-empty-lines looking-at "[ ]*\n" replace-match "" newline] 4 (#$ . 59287)])#@82 Initialize the property list for ENTRY from the template definition. (fn ENTRY) (defalias 'org-capture-set-plist #[257 "\301\302\233!\303\304@\305A@\306\3078&\210\3108\3118\206 \312\2030;\203K\313\314\"\204K\211\315\267\202K\316\262\202K\317\262\202K\320\262\202K\321\262\303\322\323$\207" [org-capture-plist copy-sequence 5 org-capture-put :key :description :target 3 4 2 entry string-match "\\S-" #s(hash-table test eq purecopy t data (item 54 checkitem 60 table-line 66 nil 72 entry 72)) "- %?" "- [ ] %?" "| %? |" "* %?\n %a" :template :type] 9 (#$ . 59815)])#@141 Go to the target location of a capture template. If TEMPLATE-KEY is nil, the user is queried for the template. (fn &optional TEMPLATE-KEY) (defalias 'org-capture-goto-target #[256 "\300!\211\204 \301\302!\210\303!\210\304 \210\305\306\307!!\210\306\310!b\207" [org-capture-select-template error "No capture template selected" org-capture-set-plist org-capture-set-target-location pop-to-buffer-same-window org-capture-get :buffer :pos] 5 (#$ . 60413) nil])#@138 Make an indirect BUFFER for a capture process. Use PREFIX as a prefix for the name of the indirect buffer. (fn &optional BUFFER PREFIX) (defalias 'org-capture-get-indirect-buffer #[512 "\206p\262\300\301!\302\303Q\262\304\305!!\203,\303\306T\211\262!\303\260\262\202\30717\310\311#0\207\210\310\"r\211q\210\312 )\210\207" [1 buffer-name nil "-" buffer-live-p get-buffer number-to-string (error) make-indirect-buffer clone org-mode] 10 (#$ . 60880)])#@53 Throw error if TREE is not a valid tree. (fn TREE) (defalias 'org-capture-verify-tree #[257 "\300!?\205\n\301\302!\207" [org-kill-is-subtree-p error "Template is not a valid Org entry or tree"] 3 (#$ . 61359)])#@115 Select a capture template. Lisp programs can force the template by setting KEYS to a string. (fn &optional KEYS) (defalias 'org-capture-select-template #[256 "\302\303! \"\206\n\304\211\203\305\"\206#\306\307\"\202#\310\311\312\313$)\207" [org-capture-templates org-capture-templates-contexts org-contextualize-keys org-capture-upgrade-templates (("t" "Task" entry (file+headline "" "Tasks") "* TODO %?\n %u\n %a")) assoc error "No capture template referred to by \"%s\" keys" org-mks "Select a capture template\n=========================" "Template key: " (("C" "Customize org-capture-templates") ("q" "Abort"))] 6 (#$ . 61579)])#@33 List various clipboards values. (defvar org-capture--clipboards nil (#$ . 62229))#@356 Fill a TEMPLATE and return the filled template as a string. The template may still contain "%?" for cursor positioning. INITIAL content and/or ANNOTATION may be specified, but will be overridden by their respective `org-store-link-plist' properties if present. Expansion occurs in a temporary Org mode buffer. (fn &optional TEMPLATE INITIAL ANNOTATION)#@10 (fn S) (defalias 'org-capture-fill-template #[768 "\206\306\307!\306\310!\311\312!\206!\306\313!\206\314 \315!\3168W\203>\317\320\321\322\3238S\3248\3258\257!\266\202\202?\210\326\327\330!\"\326\327\331!\"\326\327\330\331\"\"\326\327\331\211\"\" \205`\332\320!\333\334!\206s\333\335!\206s\333\336!\206s\337\340\n\341\"\206\246 ;\203\237 \330\211\203\223\342\320G $\266\202\234\343\320G\330$\266\206\246\306\341!\206\246\337\340\n\344\"\206\271 \206\271\306\344!\206\271\337\211\345\232\203\301\210\337\211\203\325\346\347\"\203\325\350\351\330\211$\202\326\211\203\352\346\347\"\203\352\350\352\330\211$\202\353\203\346\347\"\203\350\353\330\211$\202\f\354 !\203'@\330\211\203\342\320G $\266\202(\343\320G\330$\266\202(\337\354 !\203\207\n \212\355!\203?\354!q\210\202n\211\247\204n\356!\211\357\267\202W\210\330\202q\210\330\202qA@@\360=\203i\210\211A@A@\202q\340A@\360\"\262\211\203\205\211\361H\211\362=?\205\200\211\266\202\202\245\356!\211\363\267\202\235\266\202\f\364\320\310#\266\202\202\245\340A@\310\"\266\202\203\f\356!\211\365\267\202\273\210\330\202\325\210\330\202\325A@@\360=\203\315\210\211A@A@\202\325\340A@\360\"\262\211\203\351\211\361H\211\362=?\205\344\211\266\202\202\n\356!\211\366\267\202\266\330\202\n\364\320\310#\266\202\202\n\340A@\310\"\266\202q\210\356!\211\367\267\202\210\330\2029\210\330\2029A@@\360=\2031\210\211A@A@\2029\340A@\360\"\262\211\203M\211\320H\211\362=?\205H\211\266\203\202n\356!\211\370\267\202f\266\330\202n\364\320\371#\266\203\202n\340A@\371\"\266\203\212\214~\210\211\206w`b\210\372\330\211\"+\262\262\202\210\337\306\373!\206\217\337\306\374!\206\226\337\375\330 \333\334!\333\335!\333\336!\257\"A\376\n\344 #\376\n\341\f#\204\323\337\262\377\201M!\210\201N \210\201O\201P!\210\201Q \201R\201S\"\216\201T\201U\201V!!\210\201W \210\330\211 Bc\210\201X \210eb\210\212\201Y\201Z\330\331#\203^\201[\201\\\201P!!\201]\320\224!\201]\320\225!\201^ \204Y|\210\330\211\223\210\211\330\211\223\210\201_1M\201`!0\266\202\201a\201b#c\266\266\202)\201c\201d!\210\212\201Y\201e\330\331#\203x\201]\320\224!\201]\320\225!\201\\\201P!\201\\\316!\201^ \204s|\210\330\211\223\210\330\211\223\210\201f \201g!\211\201h\267\202Z\326\"\262\202]\340\n\201i!\"\206[\210\337\202]\203\327\210\202]\201j\331\201k \203\347`\202\353\201l {\262P\201m\201j\330\331%\266\202\202]\210\202]\210 \202]\210\202]\210\202]\210\202]\210 \202]\210\202]\210\f\202]\210 \202]\210\n\202]\210\202]\210\202]\210\202]\210\202]\210\202]\330\262\203o\201m\201n\201o#\202p\211c\266\266\202h)\201c \210\331C\201X )\210\201p\201q\"\210\330\212\201Y\201r\330\331#\203#\201P\225\205\304\201s \201R\201t\"\216\201u\201v\201P!\201w\")\262\201\\\316!\201]\320\224!\201]\320\225!@A@AA\201^ \204|\210\330\211\223\210\330\211\223\210\201x\267\202\201y\201z\232\203 \201{ \202\203C\202\330!D\331E\201|\201}\201~F\201\2039\201\200P\202<\201\201D\330\211\211\201\202&)\201\203#\201\204!\203`Sf\201\205=\204b\201\203c\210\211c\210\330f\201\205=\204s\201\203c\210\201\206 \203\201\207 \210*\266\202\223\201\210\232\203\223\201\211\202\226\201\212A\203\321A:\203\307A\242A\243\211\204\263!\266 \202\223\201\213\201\214\201A$!\266 \202\223\201\215\201\216A\"\210\266\202\223\201\217\201G!\210\330G\201\220 \306\201\221!\306\310!\223\306\201\222!\203\372\211\202\227\201\223 \204\372\201\224 \212\355!\203\354!q\210\202S\247\204S\356!\211\201\225\267\202/\210\330\202I\210\330\202IA@@\360=\203A\210A@A@\202I\340A@\360\"\262\211\203]\211\361H\211\362=?\205X\211\266\202\202\200\356!\211\201\226\267\202x\266\202\354\364\320\310#\266\202\202\200\340A@\310\"\266\202\203\354\356!\211\201\227\267\202\230\210\330\202\262\210\330\202\262A@@\360=\203\252\210A@A@\202\262\340A@\360\"\262\211\203\306\211\361H\211\362=?\205\301\211\266\202\202\352\356!\211\201\230\267\202\342\266\330\202\352\364\320\310#\266\202\202\352\340A@\310\"\266\202q\210\356!\211\201\231\267\202\210\330\202\210\330\202A@@\360=\203\210A@A@\202\340A@\360\"\262\211\203/\211\320H\211\362=?\205*\211\266\203\202S\356!\211\201\232\267\202K\266\330\202S\364\320\371#\266\203\202S\340A@\371\"\266\203\212\214~\210\211\206\\`b\210\201\206 \203l\201\224 \202nH\211\203\201\211Y\203\201\201\223 \262\202n\211\203\216\201\233 \262\202\224\201\234 \262+\266\202\201\235#\201\236\"\266 \202\223\226\232\330I\201\237\331\330$\201\240J\206\306\n\201\241\235\330\211IC&)\266\n\202\223\201\242K\"L\201\243\201\244\206\357\201\245\"\330\211\211\201L&B\262@c\210\201\246LK#\266\202\223\201\215\201\247\"\210\266\202\223)\237\212\201Y\201\250\330\331#\203O\201^ \204&\350\201\251\201\\\201P!!S8\330\331#\210\202&)\210\201\252\330w\210e\201k |\210db\210\201\252\330x\210o\203u`\201l |\210\202\201\330\210`d|\210\201jc\210\201\253ed\"\210\201\254\330!\210\201\255ed\"\201\256p!*\210\207" [org-extend-today-until kill-ring org-store-link-plist org-rm-props user-full-name org-clock-marker org-capture-get :template :buffer buffer-file-name buffer-base-buffer :default-time current-time decode-time 2 encode-time 0 59 23 3 4 5 format-time-string org-time-stamp-format nil t current-kill org-get-x-clipboard PRIMARY CLIPBOARD SECONDARY "" plist-get :initial remove-text-properties set-text-properties :annotation "[[]]" string-match "\\[\\[\\(.*?\\)\\]\\(\\[.*?\\]\\)?\\]" replace-match "[[\\1][%^{Link description}]]" "[[\\1]]" "\\1" marker-buffer markerp org-element-type #s(hash-table test eq purecopy t data (nil 333 plain-text 338)) :standard-properties 14 org-element-ast--nil #s(hash-table test eq purecopy t data (nil 398 plain-text 403)) get-text-property #s(hash-table test eq purecopy t data (nil 433 plain-text 438)) #s(hash-table test eq purecopy t data (nil 498 plain-text 504)) #s(hash-table test eq purecopy t data (nil 533 plain-text 538)) #s(hash-table test eq purecopy t data (nil 598 plain-text 604)) :begin org-store-link :original-file-nondirectory :original-file delq plist-put message org-clock-heading org-capture--clipboards mark-active org-inhibit-startup org-last-tags-completion-table org-add-colon-after-tag-completion crm-separator org-keyword-properties most-positive-fixnum org-end-time-was-given org-time-was-given org-capture--prompt-history-table org-capture--prompt-history "no template" ding sit-for 1 current-window-configuration make-closure #[0 "\301\300!\207" [V0 set-window-configuration] 2] switch-to-buffer-other-window get-buffer-create "*Capture*" erase-buffer org-mode re-search-forward "%\\[\\(.+\\)\\]" expand-file-name match-string copy-marker org-capture-escaped-% (error) insert-file-contents format "%%![could not insert %s: %s]" org-capture-expand-embedded-elisp mark "%\\(:[-A-Za-z]+\\|<\\([^>\n]+\\)>\\|[aAcfFikKlLntTuUx]\\)" org-capture-inside-embedded-elisp-p string-to-char #s(hash-table test eq purecopy t data (60 946 58 956 105 973 97 1024 65 1030 99 1036 102 1042 70 1048 107 1054 75 1060 108 1066 76 1072 110 1078 116 1084 84 1090 117 1096 85 1102 120 1108)) intern "\n" line-beginning-position line-end-position replace-regexp-in-string "[\\\"]" "\\\\\\&" org-clone-local-variables "\\`org-" "%\\^\\(?:{\\([^}]*\\)}\\)?\\([CgGLptTuU]\\)?" match-data #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] split-string match-string-no-properties "|" #s(hash-table test equal purecopy t data ("g" 1274 "G" 1274 "L" 1413 "C" 1413 "p" 1494 "U" 1963 "u" 1963 "T" 1963 "t" 1963 nil 2009)) org-global-tags-completion-table "G" org-agenda-files mapconcat identity "[ ]*:[ ]*" completing-read-multiple ": " "Tags: " org-tags-history ":" org-string-nw-p 58 org-at-heading-p org-align-tags "C" insert #[257 "\300\301\"\207" [org-insert-link 0] 4 (#$ . 62677)] read-string "Clipboard/kill value: " error "Invalid `org-capture--clipboards' value: %S" make-local-variable make-marker :pos :target-entry-p org-up-heading-safe org-current-level #s(hash-table test eq purecopy t data (nil 1573 plain-text 1578)) #s(hash-table test eq purecopy t data (nil 1640 plain-text 1645)) #s(hash-table test eq purecopy t data (nil 1678 plain-text 1683)) #s(hash-table test eq purecopy t data (nil 1745 plain-text 1751)) #s(hash-table test eq purecopy t data (nil 1783 plain-text 1788)) #s(hash-table test eq purecopy t data (nil 1850 plain-text 1856)) point-marker point-min-marker org-read-property-value org-set-property org-read-date org-insert-timestamp ("u" "U") gethash org-completing-read org-format-prompt "Enter string" puthash "Unknown template placeholder: \"%%^%s\"" "%\\\\\\([1-9][0-9]*\\)" string-to-number " \n" untabify set-buffer-modified-p buffer-substring-no-properties kill-buffer] 42 (#$ . 62317)])#@108 Non-nil if % was escaped. If yes, unescape it now. Assume `match-data' contains the placeholder to check. (defalias 'org-capture-escaped-% #[0 "\212\300\224b\210\301\302\303x!\304T\305\245!\210\211\305\246\306U)\207" [0 abs "\\\\" nil delete-char 2 1] 4 (#$ . 71797)])#@258 Evaluate embedded elisp %(sexp) and replace with the result. When optional MARK argument is non-nil, mark Sexp with a text property (`org-embedded-elisp') for later evaluation. Only marked Sexp are evaluated when this argument is nil. (fn &optional MARK) (defalias 'org-capture-expand-embedded-elisp #[256 "\212eb\210\301\302\303\304#\205{\305\306\224\307\"\203B\306\224b\210`\310u\210\311p!\312\313!!`|\210\211\203=\211;\2038\211c\266\202\314\315\"\210\266\202\211\203\316 \204\317 p\320\321#\216\322!\210\3231e\324`S\310\"0\202g\210\303)\266\202\211\203w\325`\326Z\307\304$\210\210\202)\207" [emacs-lisp-mode-syntax-table re-search-forward "%(" nil t get-text-property 0 org-embedded-elisp 1 read org-eval org-capture--expand-keyword-in-embedded-elisp error "Capture template sexp `%s' must evaluate to string or nil" org-capture-escaped-% syntax-table make-closure #[0 "r\300q\210\302\301!)\207" [V0 V1 set-syntax-table] 2] set-syntax-table (error) scan-sexps put-text-property 2] 7 (#$ . 72074)])#@156 Recursively replace capture link keywords in ATTR sexp. Such keywords are prefixed with "%:". See `org-capture-template' for more information. (fn ATTR) (defalias 'org-capture--expand-keyword-in-embedded-elisp #[257 "\211:\203\n\301\302\"\207\2119\203(\303!\304\305\"\205\306\307\310\"!\311\"\206'\207\207" [org-store-link-plist mapcar org-capture--expand-keyword-in-embedded-elisp symbol-name string-match "%\\(:.*\\)" intern match-string 1 plist-get] 6 (#$ . 73109)])#@138 Non-nil if point is inside of embedded elisp %(sexp). Assume sexps have been marked with `org-capture-expand-embedded-elisp' beforehand. (defalias 'org-capture-inside-embedded-elisp-p #[0 "\300`\301\"\207" [get-text-property org-embedded-elisp] 3 (#$ . 73599)])#@72 Set `org-capture-templates' to be similar to `org-remember-templates'. (defalias 'org-capture-import-remember-templates #[0 "\302\303!\205\302\304!\205\305\306!\210\307\310\"\211\207" [org-remember-templates org-capture-templates yes-or-no-p "Import old remember templates into org-capture-templates? " "Note that this will remove any templates currently defined in `org-capture-templates'. Do you still want to go ahead? " require org-remember mapcar #[257 "\211@\303A@!\3048\3058\206\3068\206 \n\307\211\211\310\267\202<\311D\262\312=\262\202D\313D\262\307\262\202D\314E\262\315\316\"\203X\317\320\321\211\n$\262\321\262\315\322\"\203b\210\321\323\n\324 \257\205r\325\205w\326\205|\327$\207" [org-default-notes-file org-remember-default-headline org-reverse-note-order char-to-string 2 3 4 nil #s(hash-table test eq purecopy t data (top 34 bottom 34 date-tree 48)) file top file+datetree file+headline string-match "%!" replace-match "" t "%&" append entry (:prepend t) (:immediate-finish t) (:jump-to-captured t)] 16 (#$ . 1083)]] 3 (#$ . 73866) nil]) (provide 'org-capture)