Current File : //usr/local/share/emacs/27.2/lisp/org/org-refile.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\302\303\304\305\306\307\310\301&\210\311\312\313\314\315DD\316\310\303\310\317\320\321\322\323& \210\311\324\313\314\325DD\326\310\303\322\327&\210\311\330\313\314\331DD\332\310\303\322\333&\210\311\334\313\314\335DD\336\310\303\320\321\322\337& \210\311\340\313\314\341DD\342\310\303\322\343&\210\311\344\313\314\345DD\346\310\303\322\337&\210\311\347\313\314\350DD\351\310\303\322\352&\210\311\353\313\314\354DD\355\310\303\320\321\322\337& \207" [require org custom-declare-group org-refile nil "Options concerning refiling entries in Org mode." :tag "Org Refile" :group custom-declare-variable org-log-refile funcall function #[0 "\300\207" [nil] 1] "Information to record when a task is refiled.\n\nPossible values are:\n\nnil Don't add anything\ntime Add a time stamp to the task\nnote Prompt for a note and add it with template `org-log-note-headings'\n\nThis option can also be set with on a per-file-basis with\n\n #+STARTUP: nologrefile\n #+STARTUP: logrefile\n #+STARTUP: lognoterefile\n\nYou can have local logging settings for a subtree by setting the LOGGING\nproperty to one or more of these keywords.\n\nWhen bulk-refiling, e.g., from the agenda, the value `note' is\nforbidden and will temporarily be changed to `time'." org-progress :version "24.1" :type (choice (const :tag "No logging" nil) (const :tag "Record timestamp" time) (const :tag "Record timestamp with note." note)) org-refile-targets #[0 "\300\207" [nil] 1] "Targets for refiling entries with `\\[org-refile]'.\nThis is a list of cons cells. Each cell contains:\n- a specification of the files to be considered, either a list of files,\n or a symbol whose function or variable value will be used to retrieve\n a file name or a list of file names. If you use `org-agenda-files' for\n that, all agenda files will be scanned for targets. Nil means consider\n headings in the current buffer.\n- A specification of how to find candidate refile targets. This may be\n any of:\n - a cons cell (:tag . \"TAG\") to identify refile targets by a tag.\n This tag has to be present in all target headlines, inheritance will\n not be considered.\n - a cons cell (:todo . \"KEYWORD\") to identify refile targets by\n todo keyword.\n - a cons cell (:regexp . \"REGEXP\") with a regular expression matching\n headlines that are refiling targets.\n - a cons cell (:level . N). Any headline of level N is considered a target.\n Note that, when `org-odd-levels-only' is set, level corresponds to\n order in hierarchy, not to the number of stars.\n - a cons cell (:maxlevel . N). Any headline with level <= N is a target.\n Note that, when `org-odd-levels-only' is set, level corresponds to\n order in hierarchy, not to the number of stars.\n\nEach element of this list generates a set of possible targets.\nThe union of these sets is presented (with completion) to\nthe user by `org-refile'.\n\nYou can set the variable `org-refile-target-verify-function' to a function\nto verify each headline found by the simple criteria above.\n\nWhen this variable is nil, all top-level headlines in the current buffer\nare used, equivalent to the value `((nil . (:level . 1))'." (repeat (cons (choice :value org-agenda-files (const :tag "All agenda files" org-agenda-files) (const :tag "Current buffer" nil) (function) (variable) (file)) (choice :tag "Identify target headline by" (cons :tag "Specific tag" (const :value :tag) (string)) (cons :tag "TODO keyword" (const :value :todo) (string)) (cons :tag "Regular expression" (const :value :regexp) (regexp)) (cons :tag "Level number" (const :value :level) (integer)) (cons :tag "Max Level number" (const :value :maxlevel) (integer))))) org-refile-target-verify-function #[0 "\300\207" [nil] 1] "Function to verify if the headline at point should be a refile target.\nThe function will be called without arguments, with point at the\nbeginning of the headline. It should return t and leave point\nwhere it is if the headline is a valid target for refiling.\n\nIf the target should not be selected, the function must return nil.\nIn addition to this, it may move point to a place from where the search\nshould be continued. For example, the function may decide that the entire\nsubtree of the current entry should be excluded and move point to the end\nof the subtree." (choice (const nil) (function)) org-refile-use-cache #[0 "\300\207" [nil] 1] "Non-nil means cache refile targets to speed up the process.\n\\<org-mode-map>The cache for a particular file will be updated automatically when\nthe buffer has been killed, or when any of the marker used for flagging\nrefile targets no longer points at a live buffer.\nIf you have added new entries to a buffer that might themselves be targets,\nyou need to clear the cache manually by pressing `C-0 \\[org-refile]' or,\nif you find that easier, `\\[universal-argument] \\[universal-argument] \\[universal-argument] \\[org-refile]'." boolean org-refile-use-outline-path #[0 "\300\207" [nil] 1] "Non-nil means provide refile targets as paths.\nSo a level 3 headline will be available as level1/level2/level3.\n\nWhen the value is `file', also include the file name (without directory)\ninto the path. In this case, you can also stop the completion after\nthe file name, to get entries inserted as top level in the file.\n\nWhen `full-file-path', include the full file path.\n\nWhen `buffer-name', use the buffer name." (choice (const :tag "Not" nil) (const :tag "Yes" t) (const :tag "Start with file name" file) (const :tag "Start with full file path" full-file-path) (const :tag "Start with buffer name" buffer-name)) org-outline-path-complete-in-steps #[0 "\300\207" [t] 1] "Non-nil means complete the outline path in hierarchical steps.\nWhen Org uses the refile interface to select an outline path (see\n`org-refile-use-outline-path'), the completion of the path can be\ndone in a single go, or it can be done in steps down the headline\nhierarchy. Going in steps is probably the best if you do not use\na special completion package like `ido' or `icicles'. However,\nwhen using these packages, going in one step can be very fast,\nwhile still showing the whole path to the entry." org-refile-allow-creating-parent-nodes #[0 "\300\207" [nil] 1] "Non-nil means allow the creation of new nodes as refile targets.\nNew nodes are then created by adding \"/new node name\" to the completion\nof an existing node. When the value of this variable is `confirm',\nnew node creation must be confirmed by the user (recommended).\nWhen nil, the completion must match an existing entry.\n\nNote that, if the new heading is not seen by the criteria\nlisted in `org-refile-targets', multiple instances of the same\nheading would be created by trying again to file under the new\nheading." (choice (const :tag "Never" nil) (const :tag "Always" t) (const :tag "Prompt for confirmation" confirm)) org-refile-active-region-within-subtree #[0 "\300\207" [nil] 1] "Non-nil means also refile active region within a subtree.\n\nBy default `org-refile' doesn't allow refiling regions if they\ndon't contain a set of subtrees, but it might be convenient to\ndo so sometimes: in that case, the first line of the region is\nconverted to a headline before refiling."] 12)
#@54 The list of refile targets, created by `org-refile'.
(defvar org-refile-target-table nil (#$ . 7697))
#@27 Cache for refile targets.
(defvar org-refile-cache nil (#$ . 7805))
#@52 All the markers used for caching refile locations.
(defvar org-refile-markers nil (#$ . 7879))
(mapc #[257 "\301\302#\207" [org-org-menu easy-menu-add-item ("Edit Structure")] 5 "\n\n(fn I)"] '(["Refile Subtree" org-refile (org-in-subtree-not-table-p)] ["Refile and copy Subtree" org-copy (org-in-subtree-not-table-p)]))
#@67 Get a new refile marker, but only if caching is in use.
(fn POS)
(defalias 'org-refile-marker #[257 "\204 \207\302 \211\303\223\210\211 B\211\207" [org-refile-use-cache org-refile-markers make-marker nil] 5 (#$ . 8208)])
#@53 Clear the refile cache and disable all the markers.
(defalias 'org-refile-cache-clear #[0 "\211\203 \211@\211\302\211\223\210A\266\202\202 \210\302\211\303\304!\207" [org-refile-markers org-refile-cache nil message "Refile cache has been cleared"] 6 (#$ . 8440)])
#@74 Check if all the markers in the cache still have live buffers.
(fn SET)
(defalias 'org-refile-cache-check-set #[257 "\300\30123 \2031 \302\211A\262\2428\211\262\2031 \211\203 \303!\204 \304\305!\210\306\302!\210\307\301\300\"\210\202 \3100\207" [nil exit 3 marker-buffer message "Please regenerate the refile cache with `C-0 C-c C-w'" sit-for throw t] 5 (#$ . 8716)])
#@92 Push the refile targets SET into the cache, under IDENTIFIERS.
(fn SET &rest IDENTIFIERS)
(defalias 'org-refile-cache-put #[385 "\301\302!!\303\"\211\203 \211\241\202 BB\211\207" [org-refile-cache sha1 prin1-to-string assoc] 6 (#$ . 9099)])
#@92 Retrieve the cached value for refile targets given by IDENTIFIERS.
(fn &rest IDENTIFIERS)
(defalias 'org-refile-cache-get #[128 "\204 \302\207 \204 \303 \210\302\207\304\305\306!!\"A\211\205# \307!\205# \211\207" [org-refile-cache org-refile-use-cache nil org-refile-cache-clear assoc sha1 prin1-to-string org-refile-cache-check-set] 5 (#$ . 9357)])
#@69 Produce a table with refile targets.
(fn &optional DEFAULT-BUFFER)
(defalias 'org-refile-get-targets #[256 "\306\206 \307\306\211\211\211\211\310\311!\210r\206 pq\210\211\203\211@\211@\262\211A\262\2045 pC\262\202d \312=\203C \312\313!\262\202d 9\203U \314!\203U \262\202d 9\203d \315!\203d J\262;\203m C\262@\316=\203\200 \317\320A!\321Q\262\202\346 @\322=\203\223 \323\320A!\324Q\262\202\346 @\325=\203\241 A\262\202\346 @\326=\203\301 \327\330\n\203\267 \331A_S\202\271 A!\332Q\262\202\346 @\333=\203\341 \334\330\n\203\327 \331A_S\202\331 A!\332Q\262\202\346 \335\336\"\210\211\203\377\211@r\337!\203\370 \211\202\373 \340!q\210\341\342 \"\211\262 \204\341\337!\203\342\343!!\262\211\205 \344!\262 \345=\2031\346!\306\211FB\262 \347=\203D\347\343 !\306\211FB\262 \350=\203Y\351\342\343 !!\306\211FB\262\212\214~\210eb\210\306\352\306\353#\203\340\354 \210\306\355
!\210)`\356\357!=\203\203= \203\322\211\203\322\360>\320!\" \204\226\202\304\361\362\363 \364\267\202\271\346\342\343 !!C\202\272\342\343 !C\202\272\347\343 !C\202\272\306\365\366\367\353\211\"\"\"\370#\211\371`!F\fB\262\f\266`U\203\333\306\210\266\202b*?\203\357\372\342 #\210\363\n\"\262 )A\266\202\202\347 \210A\266\202\202 \210)\310\373!\210\374\237!)\207" [org-refile-targets case-fold-search org-odd-levels-only org-refile-use-outline-path org-outline-path-cache org-complex-heading-regexp nil ((nil :level . 1)) message "Getting targets..." org-agenda-files unrestricted fboundp boundp :tag "^\\*+[ ]+.*?:" regexp-quote ":" :todo "^\\*+[ ]+" "[ ]" :regexp :level "^\\*\\{" number-to-string 2 "\\}[ ]" :maxlevel "^\\*\\{1," error "Bad refiling target description %s" bufferp org-get-agenda-file-buffer org-refile-cache-get buffer-file-name buffer-base-buffer expand-file-name file file-name-nondirectory buffer-name full-file-path file-truename re-search-forward t beginning-of-line looking-at match-string-no-properties 4 format mapconcat identity append #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (file 415 full-file-path 425 buffer-name 433)) mapcar #[257 "\300\301\302\303\304%\207" [replace-regexp-in-string "/" "\\/" nil t] 7 "\n\n(fn S)"] org-get-outline-path "/" org-refile-marker org-refile-cache-put "Getting targets...done" delete-dups org-refile-target-verify-function org-complex-heading-regexp-format org-refile-use-cache] 24 (#$ . 9720)])
#@34 History for refiling operations.
(defvar org-refile-history nil (#$ . 12222))
#@157 Hook run after `org-refile' has inserted its stuff at the new location.
Note that this is still *before* the stuff will be removed from
the *old* location.
(defvar org-after-refile-insert-hook nil (#$ . 12307))
#@57 Non-nil means `org-refile' will copy instead of refile.
(defvar org-refile-keep nil (#$ . 12524))
(byte-code "\300\301\302\303#\210\304\301\302\303#\207" [defalias org-copy org-refile-copy nil make-obsolete] 4)
#@54 Like `org-refile', but preserve the refiled subtree.
(defalias 'org-refile-copy #[0 "\301\302\303\211\211\304$)\207" [org-refile-keep t org-refile nil "Copy"] 5 (#$ . 12741) nil])
#@1898 Move the entry or entries at point to another heading.
The list of target headings is compiled using the information in
`org-refile-targets', which see.
At the target location, the entry is filed as a subitem of the
target heading. Depending on `org-reverse-note-order', the new
subitem will either be the first or the last subitem.
If there is an active region, all entries in that region will be
refiled. However, the region must fulfill the requirement that
the first heading sets the top-level of the moved text.
With a `\[universal-argument]' ARG, the command will only visit the target location
and not actually move anything.
With a prefix `\[universal-argument] \[universal-argument]', go to the location where the last
refiling operation has put the subtree.
With a numeric prefix argument of `2', refile to the running clock.
With a numeric prefix argument of `3', emulate `org-refile-keep'
being set to t and copy to the target location, don't move it.
Beware that keeping refiled entries may result in duplicated ID
properties.
RFLOC can be a refile location obtained in a different way. It
should be a list with the following 4 elements:
1. Name - an identifier for the refile location, typically the
headline text
2. File - the file the refile location is in
3. nil - used for generating refile location candidates, not
needed when passing RFLOC
4. Position - the position in the specified file of the
headline to refile under
MSG is a string to replace "Refile" in the default prompt with
another verb. E.g. `org-copy' sets this parameter to "Copy".
See also `org-refile-use-outline-path'.
If you are using target caching (see `org-refile-use-cache'), you
have to clear the target cache in order to find new targets.
This can be done with a `0' prefix (`C-0 C-c C-w') or a triple
prefix argument (`C-u C-u C-u C-c C-w').
(fn &optional ARG DEFAULT-BUFFER RFLOC MSG)
(defalias 'org-refile #[1024 "\306\235\203 \307 \207\211\203 \211\202 \310\232\203 \311\202 \312\313 \211\205$ \314 \205* \315 \310\232\2035 \316\2026 \317\211\211\211\211\211\211\203o b\210\320 \210`\262\321{!\204o \n\322 \323 \210\322 Z \\\262 \210\204o \324\325!\210
\326\232\203{ \327 \2021
\330\232\203\244 \203\244 \331 !\203\244 \f\206\221 \332\333\331 !!\334\335 !F\211\262\317\262\204 \206\372 \317\212\203\266 <\204\310 \336\316!\210\337
\340\341\342 8\206\305 \334#\262\343\203\330 <\203\330 \344\202\352 \n\203\344 \345P\202\352 \346\347R\350\232?\205\366 @#)\262\211\262\2051A@\262\3108\262
\204B\203B\333 \232\203B\203-Y\203BX\202;`Y\203B\212\351\316\211\")W\203B\352\353!\210\354!\206K\355!\262
\203s
\310\232\204s\356!\210\206k\357 \203je\202kdb\210\360\361!\2021\203\212\362{!\210\363\"\210\202\220\364\365\317\316#\210r\354!\206\232\355!\211\262q\210\357 \262\212\214~\210\203\327b\210\366A \365\"\262\211\203\303\367 \206\322d\202\322\212\370 )\206\322\351\316\211\"\206\322db\210\202\357\365\262\211\204\344db\210\202\357eb\210\367 \204\357db\210n\204\366\371 \210\372\317\211\316$\210B\203 \203\373\374``\n\fZ\\#\210\202 \375\376\317\211B$\210C\203*\317 D\377 \210)\201J E\201K \"\211\203Q\201L 1F\201M !0\202P\201N \201O \"\262\210\210\201P \201F !\203\217F\203\217\201J E\201Q \"\211\203\210\201R 1}\201M !0\202\207\201N \201O \"\262\210\210G`\317\223\210\201S \201T !\203\236\201T \210\201U \201V !\210+\204\203\275``\nZ\\|\210\202\212\214~\210db\210\316 H\201W \201X `\201Y Z\365]\316#\205\337\201Z `d\"+\201[ \201\\ \201] \201^ \201_ !\201` \"\201a $\216\336\316!\205`\201b T\351\316\211\"^`^|\210)\210\201c \201d !\203 \201e \210\317I\201N \201f @$)\207" [org-refile-keep last-command org-refile-active-region-within-subtree org-clock-hd-marker org-clock-heading org-link-bracket-re (0 (64)) org-refile-cache-clear 3 "Refile (and keep)" "Refile" org-region-active-p region-beginning region-end t nil beginning-of-line org-kill-is-subtree-p point-at-eol org-toggle-heading user-error "The region is not a (sequence of) subtree(s)" (16) org-refile-goto-last-stored 2 marker-buffer "running clock" buffer-file-name "" marker-position org-back-to-heading replace-regexp-in-string "\\2" 4 org-heading-components org-refile-get-location "Goto" " region to" " subtree \"" "\" to" (4) org-end-of-subtree error "Cannot refile to position inside the tree or region" find-buffer-visiting find-file-noselect pop-to-buffer-same-window org-notes-order-reversed-p org-show-context org-goto org-kill-new org-save-markers-in-region org-copy-subtree 1 org-get-valid-level outline-next-heading org-get-next-sibling newline org-paste-subtree org-map-region #[0 "\300\301\302\211\303$\207" [org-add-log-setup refile nil time] 5] org-add-log-setup refile org-align-tags org-refile-allow-creating-parent-nodes outline-level org-log-refile org-auto-align-tags org-loop-over-headlines-in-active-region org-bookmark-names-plist org-capture-is-refiling org-capture-last-stored-marker case-fold-search org-markers-to-move plist-get :last-refile (debug error) bookmark-set message "Error: %S" boundp :last-capture-marker (debug error) fboundp deactivate-mark run-hooks org-after-refile-insert-hook re-search-backward "^[ ]*# +Local Variables:" 3000 delete-and-extract-region make-byte-code 0 "\300\205* \212\214~\210db\210\301\302\303`S!\"n\204 \304c\210\300c\210\211\205' \305\306!d#\262*\207" vconcat vector [cl-find-if #[257 "\300\301\"\302=\207" [overlay-get invisible outline] 4 "\n\n(fn O)"] overlays-at "\n" move-overlay overlay-start] 5 buffer-size featurep org-inlinetask org-inlinetask-remove-END-maybe "%s to \"%s\" in file %s: done"] 21 (#$ . 12930) "P"])
#@54 Go to the location where the last refile was stored.
(defalias 'org-refile-goto-last-stored #[0 "\301\302\303\"!\210\304\305!\207" [org-bookmark-names-plist bookmark-jump plist-get :last-refile message "This is the location of the last refile"] 4 (#$ . 18691) nil])
#@119 When user refile to REFLOC, find the associated target in TBL.
Also check `org-refile-target-table'.
(fn REFLOC TBL)
(defalias 'org-refile--get-location #[514 "\300\301\302\303\304\305\306\307!\310\"\311\312%\313\314\315#\313\316\317 #D\"\"@\207" [delq nil mapcar make-byte-code 257 "\302\300\"\206 \302 \"\207" vconcat vector [org-refile-target-table assoc] 4 "\n\n(fn R)" replace-regexp-in-string "/$" "" "\\([^/]\\)$" "\\1/"] 11 (#$ . 18965)])
#@269 Prompt the user for a refile location, using PROMPT.
PROMPT should not be suffixed with a colon and a space, because
this function appends the default value from
`org-refile-history' automatically, if that is not empty.
(fn &optional PROMPT DEFAULT-BUFFER NEW-NODES)
(defalias 'org-refile-get-location #[768 " \306!*\n\204 \307\310!\210p\311\312!! \203# \203# \313\202$ \314 \203, \315\202- \316\317 P\2058 \320!\321\322\323\324\325\326\"\327\"\330\331%\n\"\332 \333\n
@\203\\ \334
@\335Q\206n \336\"\205n \211\262\205n \334\335Q\337Q\333\211\211\211\211\211
\262\f\n\333?\333\305\206\217
@P&\262\340\n\"\211\262\203\352
@\211
P\341!\210
\203\273
=\203\273 @\232\204\343 @\336
\"\203\312
\202\314
AB\211
A@\232\204\336
A@\232\203\343
\210
A\266\202\202,\342\343\"\203)\344\345\"\262\344\346\"\262\340\n\"\262\205,\332=\204\"\347=\205,\350\351\352\"!\205,\353\"\202,\307\354!)\207" [org-refile-targets org-refile-use-outline-path org-refile-target-table org-outline-path-complete-in-steps completion-ignore-case org-refile-history org-refile-get-targets user-error "No refile targets" buffer-file-name buffer-base-buffer org-olpath-completing-read completing-read "/" "" buffer-name expand-file-name mapcar make-byte-code 257 "\n\303>\204 \301A@\232\204 \211@\300\304\305A@!\306\260AB\207\211@\300PAB\207" vconcat vector [org-refile-use-outline-path (file full-file-path) " (" file-name-nondirectory ")"] 6 "\n\n(fn X)" t nil " (default " ")" assoc ": " org-refile--get-location org-refile-check-position string-match "\\`\\(.*\\)/\\([^/]+\\)\\'" match-string 1 2 confirm y-or-n-p format "Create new node \"%s\"? " org-refile-new-child "Invalid target location"] 27 (#$ . 19428)])
#@91 Check if the refile pointer matches the headline to which it points.
(fn REFILE-POINTER)
(defalias 'org-refile-check-position #[257 "\211A@\3018\3028\303\304!\204 \204 \305\306!\202W \307!\205W \304!\203, \310!\2025 \311!\2065 \312!\262r\211q\210\212\214~\210b\210\313\314!\210\315\316!)\262?\205V \305\317!+\207" [inhibit-changing-match-data 2 3 nil markerp user-error "Please indicate a target file in the refile path" org-string-nw-p marker-buffer find-buffer-visiting find-file-noselect beginning-of-line 1 t looking-at "Invalid refile position, please clear the cache with `C-0 C-c C-w' before refiling"] 8 (#$ . 21208)])
#@86 Use refile target PARENT-TARGET to add new CHILD below it.
(fn PARENT-TARGET CHILD)
(defalias 'org-refile-new-child #[514 "\204 \302\303!\210A@\3048\305r\306!\206 \307!q\210\212\214~\210\203) b\210\2023 db\210n\2043 \310 \210\311!\203B \262\312\313\211\"\210\314 \210\315\316\203R \317\320\"\202S \320\321\"\322\315\261\210\323\324!\210@\325Q\326`F+\207" [org-outline-regexp outline-level error "Cannot find parent for new node" 3 nil find-buffer-visiting find-file-noselect newline looking-at org-end-of-subtree t org-back-over-empty-lines "\n" make-string org-get-valid-level 1 42 " " beginning-of-line 0 "/" ""] 10 (#$ . 21859)])
#@75 Read an outline path like a file name.
(fn PROMPT COLLECTION &rest ARGS)
(defalias 'org-olpath-completing-read #[642 "\300\301\302\303\304\305\306!\307\"\310\311%$\207" [apply completing-read make-byte-code 770 "\211\301\267\202+ \302\300\"\207G\303\304\305\306\307\310 \"\311\"\312\313%\314\300#\"\207\315\300\"\207\316\207" vconcat vector [#s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (nil 6 t 11 lambda 38)) try-completion mapcar make-byte-code 257 "\302\301\"\303\304\"\203 \305\306\"\202 \307\303\310\"\203& \300\302\306\211\225#Q\202' \207" vconcat vector [substring string-match " ([^)]*)$" match-string 0 "" "/"] 8 "\n\n(fn X)" all-completions assoc nil] 12 "\n\n(fn STRING PREDICATE &optional FLAG)"] 13 (#$ . 22520)])
(provide 'org-refile)
Mini Shell