;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\310\303\320\321&\210\312\322\314\315\323DD\324\306\307\310\311\320\325&	\210\312\326\314\315\327DD\330\310\303\331\332\320\333&	\207" [require org custom-declare-group org-inlinetask nil "Options concerning inline tasks in Org mode." :tag "Org Inline Tasks" :group org-structure custom-declare-variable org-inlinetask-min-level funcall function #[0 "\300\207" [15] 1 #1=""] "Minimum level a headline must have before it is treated as an inline task.\nDon't set it to something higher than `29' or clocking will break since this\nis the hardcoded maximum number of stars `org-clock-sum' will work with.\n\nIt is strongly recommended that you set `org-cycle-max-level' not at all,\nor to a number smaller than this one.  In fact, when `org-cycle-max-level' is\nnot set, it will be assumed to be one less than the value of smaller than\nthe value of this variable." :type (choice (const :tag "Off" nil) (integer)) org-inlinetask-show-first-star #[0 "\300\207" [nil] 1 #1#] "Non-nil means display the first star of an inline task as additional marker.\nWhen nil, the first star is not shown." boolean org-inlinetask-default-state #[0 "\300\207" [nil] 1 #1#] "Non-nil means make inline tasks have a TODO keyword initially.\nThis should be the state `org-inlinetask-insert-task' should use by\ndefault, or nil if no state should be assigned." :version "24.1" (choice (const :tag "No state" nil) (string :tag "Specific state"))] 10)
#@172 Insert an inline task.
If prefix arg NO-STATE is set, ignore `org-inlinetask-default-state'.
If there is a region wrap it inside the inline task.

(fn &optional NO-STATE)
(defalias 'org-inlinetask-insert-task #[256 "\303 \203\304 \203n\204\305\306!\210n\204\307 \210\203$\310	_S\202%	\311
\312\"\313P\314 \2035\315 \2026`\314 \203@\316 \202A`\211b\210\317\320\261\210
b\210n\204T\317c\210\204]\n\204a\321\202d\n\313PU\203n\321\202o\317\261\210\211U?\205{\322\207" [org-odd-levels-only org-inlinetask-min-level org-inlinetask-default-state org-inlinetask-in-task-p org-inlinetask-at-task-p user-error "Cannot nest inline tasks" newline 2 make-string 42 " " org-region-active-p region-beginning region-end "\n" "END\n" "" 0] 9 (#$ . 1602) "P"])
(define-key org-mode-map "t" 'org-inlinetask-insert-task)
#@114 Return string matching an inline task heading.
The number of levels is controlled by `org-inlinetask-min-level'.
(defalias 'org-inlinetask-outline-regexp #[0 "\203	\302_S\202\f	\303\304\"\207" [org-odd-levels-only org-inlinetask-min-level 2 format "^\\(\\*\\{%d,\\}\\)[ 	]+"] 4 (#$ . 2443)])
#@63 Return a non-nil value if point is on inline task's END part.
(defalias 'org-inlinetask-end-p #[0 "\301\302\303 \304P!)\207" [case-fold-search t org-match-line org-inlinetask-outline-regexp "END[ 	]*$"] 3 (#$ . 2746)])
#@60 Return non-nil if point is at beginning of an inline task.
(defalias 'org-inlinetask-at-task-p #[0 "\300\301 \302P!\205\f\303 ?\207" [org-match-line org-inlinetask-outline-regexp "\\(.*\\)" org-inlinetask-end-p] 3 (#$ . 2972)])
#@48 Return true if point is inside an inline task.
(defalias 'org-inlinetask-in-task-p #[0 "\212\302 \210\303\304 \305P\303\306
!)\262
\206\307\310\311\303#\205\312 *\207" [case-fold-search inhibit-changing-match-data beginning-of-line t org-inlinetask-outline-regexp "\\(?:.*\\)" looking-at re-search-forward "^\\*+[ 	]+" nil org-inlinetask-end-p] 4 (#$ . 3207)])
#@50 Go to the beginning of the inline task at point.
(defalias 'org-inlinetask-goto-beginning #[0 "\301\210\302\303 
\304
\301\302#\210\305 \205\304
\301\302#)\207" [case-fold-search nil t org-inlinetask-outline-regexp re-search-backward org-inlinetask-end-p] 6 (#$ . 3580)])
#@58 Go to the end of the inline task at point.
Return point.
(defalias 'org-inlinetask-goto-end #[0 "\302 \303\304\"\216\305 \210\306\307 
\310 \203\311y\210\202Z\211\306\312
!)\262
\203Q\311y\210\310 \2034\311y\210\202Z\211\306\312
!)\262
\204Z\313 \203Z\314
\311\306#\210\311y\210\202Z\314
\311\306#\210\311y\210)\266)\210`\207" [case-fold-search inhibit-changing-match-data match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] beginning-of-line t org-inlinetask-outline-regexp org-inlinetask-end-p nil looking-at org-inlinetask-in-task-p re-search-forward] 7 (#$ . 3862)])
#@91 Get the level of the inline task around.
This assumes the point is inside an inline task.
(defalias 'org-inlinetask-get-task-level #[0 "\212\300\210\301\302 \300\303#\210\304\225\304\224Z)\207" [nil re-search-backward org-inlinetask-outline-regexp t 1] 4 (#$ . 4483)])
#@143 Promote the inline task at point.
If the task has an end part, promote it.  Also, prevents level from
going below `org-inlinetask-min-level'.
(defalias 'org-inlinetask-promote #[0 "\302 \204	\303\304!\207\212\305 \306
\307\"\211Z\310\311\"\260
\312W\203(\303\313!\266\205\202p\314 \210`\262
\315\312\316\312\317%\210\320 \210m\203K\321\322\323 \"\203K\324 \210\202N\307y\210`
U?\205n\325\326 !\210\315\312\316\312\317%\210	\316=\205n\211b\210\327!\266\205)\207" [org-inlinetask-min-level org-adapt-indentation org-inlinetask-in-task-p user-error "Not in an inline task" org-inlinetask-get-task-level org-get-valid-level -1 make-string 42 nil "Cannot promote an inline task at minimum level" org-inlinetask-goto-beginning replace-match t 1 org-inlinetask-goto-end looking-back "END\\s-*" point-at-bol beginning-of-line looking-at org-inlinetask-outline-regexp org-fixup-indentation] 11 (#$ . 4760) nil])
#@79 Demote the inline task at point.
If the task has an end part, also demote it.
(defalias 'org-inlinetask-demote #[0 "\301 \204	\302\303!\207\212\304 \305
\306\"\211Z\307\310\"\260
\311\312 \210`\262
\313\311\314\311\306%\210\315 \210m\203=\316\317\320 \"\203=\321 \210\202@\322y\210`
U?\205`\323\324 !\210\313\311\314\311\306%\210\314=\205`\211b\210\325!\266\205)\207" [org-adapt-indentation org-inlinetask-in-task-p user-error "Not in an inline task" org-inlinetask-get-task-level org-get-valid-level 1 make-string 42 nil org-inlinetask-goto-beginning replace-match t org-inlinetask-goto-end looking-back "END\\s-*" point-at-bol beginning-of-line -1 looking-at org-inlinetask-outline-regexp org-fixup-indentation] 11 (#$ . 5684) nil])
(custom-declare-face 'org-inlinetask '((t :inherit shadow)) "Face for inlinetask headlines." :group 'org-faces)
#@53 Fontify the inline tasks down to LIMIT.

(fn LIMIT)
(defalias 'org-inlinetask-fontify #[257 "\203\305	\206\n\306_S\202	\206\306\307\310\311\312Z\"\313Q\314\302!\2031\n\2031\315V\2031\316\2022\317\320\321#\205e\f\203J\322\315\224\315\225\323\324BB#\210\322\f\203S\305\202T\315\224\305\225\325#\210\322\312\224\312\225\326#\210\2022\207" [org-odd-levels-only org-inlinetask-min-level org-indent-mode org-indent-indentation-per-level org-inlinetask-show-first-star 2 200 "^\\(\\*\\)\\(\\*\\{" format "%d" 3 ",\\}\\)\\(\\*\\* .*\\)" boundp 1 org-hide org-warning re-search-forward t add-text-properties face (font-lock-fontified t) (face org-hide font-lock-fontified t) (face org-inlinetask font-lock-fontified t)] 10 (#$ . 6549)])
#@44 Toggle visibility of inline task at point.
(defalias 'org-inlinetask-toggle-visibility #[0 "\212\300 \210n\203
`S\202`)\212\301 \210\302 )

U\2063\303
T\304\"\305=\203-\306
\307\305$\207\306
\310\305$\207" [org-inlinetask-goto-end org-inlinetask-goto-beginning point-at-eol get-char-property invisible outline org-flag-region nil t] 7 (#$ . 7305)])
#@136 Hide inline tasks in buffer when STATE is `contents' or `children'.
This function is meant to be used in `org-cycle-hook'.

(fn STATE)
(defalias 'org-inlinetask-hide-tasks #[257 "\211\300\267\202:\301 \212eb\210\302
\303\304#\205\305 \210\306 \210\202\f)\207\212\307 \204/\310 \2058\307 \2058\305 \210\306 \210\202 )\207\303\207" [#s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (contents 6 children 31)) org-inlinetask-outline-regexp re-search-forward nil t org-inlinetask-toggle-visibility org-inlinetask-goto-end org-inlinetask-at-task-p outline-next-heading] 6 (#$ . 7668)])
#@34 Remove an END line when present.
(defalias 'org-inlinetask-remove-END-maybe #[0 "\301\302\303\"!\205\f\304\305!\207" [org-inlinetask-min-level looking-at format "\\([ 	]*\n\\)*\\*\\{%d,\\}[ 	]+END[ 	]*$" replace-match ""] 4 (#$ . 8298)])
(byte-code "\300\301\302\"\210\300\303\304\"\210\305\306!\207" [add-hook org-font-lock-hook org-inlinetask-fontify org-cycle-hook org-inlinetask-hide-tasks provide org-inlinetask] 3)