%PDF-
%PDF-
Mini Shell
Mini Shell
;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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'cl-lib)
#@22 Keymap for Org mode.
(defvar org-mode-map (make-sparse-keymap) (#$ . 426))
(byte-code "\300\301\302\"\210\303\302\304\305\306DD\307\310\311\312\313\314\315& \210\303\316\304\305\317DD\320\310\311\312\313\314\315& \210\303\321\304\305\322DD\323\310\311\312\324&\210\303\325\304\305\326DD\327\310\330\331\332\333\334\312\335\314\336&
\210\303\337\304\305\340DD\341\310\330\312\313&\210\303\342\304\305\343DD\344\310\330\312\345&\210\303\346\304\305\347DD\350\310\330\312\313\314\336& \207" [defvaralias org-CUA-compatible org-replace-disputed-keys custom-declare-variable funcall function #[0 "\300\207" [nil] 1] "Non-nil means use alternative key bindings for some keys.\n\nOrg mode uses S-<cursor> keys for changing timestamps and priorities.\nThese keys are also used by other packages like Shift Select mode,\nCUA mode or Windmove. If you want to use Org mode together with\none of these other modes, or more generally if you would like to\nmove some Org mode commands to other keys, set this variable and\nconfigure the keys with the variable `org-disputed-keys'.\n\nThis option is only relevant at load-time of Org mode, and must be set\n*before* org.el is loaded. Changing it requires a restart of Emacs to\nbecome effective." :group org-startup :type boolean :safe booleanp org-use-extra-keys #[0 "\300\207" [nil] 1] "Non-nil means use extra key sequence definitions for certain commands.\nThis happens automatically if `window-system' is nil. This\nvariable lets you do the same manually. You must set it before\nloading Org." org-disputed-keys #[0 "\300\207" [(([(shift up)] . [(meta p)]) ([(shift down)] . [(meta n)]) ([(shift left)] . [(meta -)]) ([(shift right)] . [(meta +)]) ([(control shift right)] . [(meta shift +)]) ([(control shift left)] . [(meta shift -)]))] 1] "Keys for which Org mode and other modes compete.\nThis is an alist, cars are the default keys, second element specifies\nthe alternative to use when `org-replace-disputed-keys' is t.\n\nKeys can be specified in any syntax supported by `define-key'.\nThe value of this option takes effect only at Org mode startup,\ntherefore you'll have to restart Emacs to apply it after changing." alist org-mouse-1-follows-link #[0 "\301\300!\203 \207\302\207" [mouse-1-click-follows-link boundp t] 2] "Non-nil means mouse-1 on a link will follow the link.\nA longer mouse click will still set point. Needs to be set\nbefore org.el is loaded." org-link-follow :version "26.1" :package-version (Org . "8.3") (choice (const :tag "A double click follows the link" double) (const :tag "Unconditionally follow the link with mouse-1" t) (integer :tag "mouse-1 click does not follow the link if longer than N ms" 450)) t org-tab-follows-link #[0 "\300\207" [nil] 1] "Non-nil means on links TAB will follow the link.\nNeeds to be set before Org is loaded.\nThis really should not be used, it does not make sense, and the\nimplementation is bad." org-follow-link-hook #[0 "\300\207" [nil] 1] "Hook that is run after a link has been followed." hook org-return-follows-link #[0 "\300\207" [nil] 1] "Non-nil means on links RET will follow the link.\nIn tables, the special behavior of RET has precedence."] 14)
#@128 Select key according to `org-replace-disputed-keys' and `org-disputed-keys'.
Or return the original if not disputed.
(fn KEY)
(defalias 'org-key #[257 "\203# \302!\303\304\305\306\307\310!\311\"\312\313% \"\211\203 \211A\202! \266\203\207" [org-replace-disputed-keys org-disputed-keys key-description cl-find-if make-byte-code 257 "\301@!\300\232\207" vconcat vector [key-description] 3 "\n\n(fn X)"] 9 (#$ . 3611)])
#@83 Define a key, possibly translated, as returned by `org-key'.
(fn KEYMAP KEY DEF)
(defalias 'org-defkey #[771 "\300\301!#\207" [define-key org-key] 7 (#$ . 4042)])
#@136 In MAP, remap the functions given in COMMANDS.
COMMANDS is a list of alternating OLDDEF NEWDEF command names.
(fn MAP &rest COMMANDS)
(defalias 'org-remap #[385 "\300\211\205\" \211A\262\242\262\211A\262\242\262\301\302\303\"#\210\202 \207" [nil org-defkey vector remap] 9 (#$ . 4216)])
(defvar org-mouse-map (make-sparse-keymap))
(byte-code "\303\304\305#\210\303\306\307#\210 \203 \303\310\311#\210\n\203& \303\312\313#\210\303\314\313#\210\303\207" [org-mouse-map org-mouse-1-follows-link org-tab-follows-link org-defkey [mouse-2] org-open-at-mouse [mouse-3] org-find-file-at-mouse [follow-link] mouse-face [tab] org-open-at-point " "] 4)
#@60 Keymap for minibuffer commands when using `org-read-date'.
(defvar org-read-date-minibuffer-local-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\303\324\325#\210\303\326\327#\210\303\330\331#\210\303\332\333#\210\303\334\335#\210\303\336\337#\210\303\340\341#\210\303\342\343#\210\303\344\345#\210\303\346\347#\210\303\350\351#\210\211\207" [minibuffer-local-map make-sparse-keymap set-keymap-parent org-defkey "." #[0 "\301\302\303\304 )\"\203 \305\306!\207\307c\207" [inhibit-field-text-motion looking-back "^[^:]+: " t line-beginning-position org-eval-in-calendar (calendar-goto-today) "."] 3 nil nil] [67108910] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-goto-today)] 2 nil nil] [M-S-left] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-backward-month 1)] 2 nil nil] [27 S-left] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-backward-month 1)] 2 nil nil] [M-S-right] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-forward-month 1)] 2 nil nil] [27 S-right] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-forward-month 1)] 2 nil nil] [M-S-up] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-backward-year 1)] 2 nil nil] [27 S-up] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-backward-year 1)] 2 nil nil] [M-S-down] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-forward-year 1)] 2 nil nil] [27 S-down] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-forward-year 1)] 2 nil nil] [S-up] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-backward-week 1)] 2 nil nil] [S-down] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-forward-week 1)] 2 nil nil] [S-left] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-backward-day 1)] 2 nil nil] [S-right] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-forward-day 1)] 2 nil nil] "!" #[0 "\300\301!\210\302\303!\207" [org-eval-in-calendar (diary-view-entries) message ""] 2 nil nil] ">" #[0 "\300\301!\207" [org-eval-in-calendar (calendar-scroll-left 1)] 2 nil nil] "<" #[0 "\300\301!\207" [org-eval-in-calendar (calendar-scroll-right 1)] 2 nil nil] "" #[0 "\300\301!\207" [org-eval-in-calendar (calendar-scroll-left-three-months 1)] 2 nil nil] [134217846] #[0 "\300\301!\207" [org-eval-in-calendar (calendar-scroll-right-three-months 1)] 2 nil nil]] 5) (#$ . 4882))
(byte-code "\303\304\305#\210\303\306\305#\210\303\307\305#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\303\324\325#\210\303\326\327#\210\303\330\331#\210\303\332\333#\210\303\334\335#\210\336\337\340 #\210\336\341\342#\210\336\343\342#\210\336\344\345#\210\336\346\347#\210\336\350\347#\210\336\351\347#\210\336\352\347#\210\336\353\354#\210\336\355\354#\210\336\356\354#\210\303\357\354#\210\336\360\361#\210\336\362\361#\210\336\363\364#\210\336\365\364#\210\336\366\364#\210\336\367\364#\210\336\370\371#\210\336\372\371#\210\336\373\371#\210\336\374\371#\210\336\375\376#\210\336\377\201@ #\210\336\201A \201@ #\210\336\201B \201C #\210\336\201D \201C #\210\336\201E \201F #\210\336\201G \201F #\210\336\201H \201I #\210\336\201J \201K #\210\336\201L \201M #\210\336\201N \201M #\210\336\201O \201P #\210\336\201Q \201P #\210\336\201R \201S #\210\336\201T \201S #\210\336\201U \201V #\210\336\201W \201V #\210\336\201X \201Y #\210\336\201Z \201[ #\210\336\201\\ \201] #\210\336\201^ \201_ #\210\336\201` \201a #\210\336\201b \201c #\210\336\201d \201e #\210\336\201f \201g #\210 \204\325\n\204\227\336\201h \361#\210\336\201i \371#\210\336\201j \364#\210\336\201k \371#\210\336\374\371#\210\336\201l \376#\210\336\201m \376#\210\336\201n \201@ #\210\336\201o \201@ #\210\336\201p \201C #\210\336\201q \201F #\210\336\201r \201M #\210\336\201s \201P #\210\336\201t \201S #\210\336\201u \201V #\210\336\201v \201Y #\210\336\201w \201[ #\210\336\201x \201] #\210\336\201y \201_ #\210\336\201z \201a #\210\336\201{ \201c #\210\336\201| \201} #\210\336\201~ \201 #\210\336\201\200 \201\201 #\210\201\202 \201\203 \201\204 \201\205 \201\206 \201\207 \201\210 \201\211 \201\212 \201\213 \201\214 \201\215 \201\216 \201\217 \201\220 \201\221 \201\222 \201\223 \201\224 \201\225 \201\226 \201\227 \201\230 \201\231 \201\232 \201\233 \201\234 \201\235 \201\236 \201\237 \201\240 \201\241 \201\242 &!\210\336\201\243 \201\244 #\210\336\201\245 \201\246 #\210\336\201\247 \201\250 #\210\336\201\251 \201\252 #\210\336\201\253 \201\252 #\210\336\201\254 \201\255 #\210\336\201\256 \201\255 #\210\336\201\257 \201\260 #\210\336\201\261 \201\262 #\210\336\201\263 \315#\210\336\201\264 \317#\210\336\201\265 \201\266 #\210\336\201\267 \201\270 #\210\336\201\271 \201\272 #\210\336\201\273 \201\272 #\210\336\201\274 \201\275 #\210\336\201q \201\276 #\210\336\201\277 \201\300 #\210\336\201\301 \201\302 #\210\336\201\303 \201\304 #\210\336\201\305 \201\306 #\210\336\201\307 \201\310 #\210\336\201\311 \201\312 #\210\336\201\313 \201\314 #\210\336\201\315 \201\316 #\210\336\201\317 \201\320 #\210\336\201\321 \201\322 #\210\336\201\323 \201\324 #\210\336\201\325 \201\326 #\210\336\201\327 \201\330 #\210\336\201\331 \201\332 #\210\336\201\333 \327#\210\336\201h \201\334 #\210\336\201\335 \201\336 #\210\336\201\337 \201\340 #\210\336\201\341 \201\342 #\210\336\201\343 \201\344 #\210\336\201\345 \201\346 #\210\336\201\347 \201\350 #\210\336\201\351 \201\352 #\210\336\201\353 \201\354 #\210\336\201\355 \201\356 #\210\336\201\357 \201\360 #\210\336\201\361 \201\362 #\210\336\201\363 \201\364 #\210\336\201\365 \201\366 #\210\336\201\367 \201\370 #\210\336\201\371 \201\372 #\210\336\201\373 \201\374 #\210\336\201\375 \201\376 #\210\336\201\377 \201 #\210\336\201\201#\210\336\201\201#\210\336\201\201#\210\336\201\201#\210\336\201\201 #\210\336\201\n\201 #\210\336\201\f\201
#\210\336\201\201#\210\336\201\201#\210\336\201\201#\210\336\201\201#\210\336\201\321#\210\336\201\201#\210\336\201\201#\210\336\201\201 #\210\336\201 \201 #\210\336\201 \201 #\210\336\201!\201\"#\210\336\201#\201$#\210\336\201%\201&#\210\336\201'\201(#\210\336\201)\201*#\210\336\201+\201,#\210\336\201-\201.#\210\336\201/\2010#\210\336\2011\2012#\210\336\2013\2014#\210\336\2015\2016#\210\336\2017\2018#\210\336\2019\201:#\210\336\201;\201<#\210\336\201=\201>#\210\336\201?\201@#\210\336\201A\311#\210\336\201B\201C#\210\336\201D\201C#\210\336\201E\201F#\210\336\201G\201H#\210\336\201I\201J#\210\336\201K\201L#\210\336\201M\201N#\210\336\201O\201P#\210\336\201Q\201R#\210\336\201S\201T#\210\336\201U\201V#\210\336\201W\201X#\210\336\201Y\201Z#\210\336\201[\201\\#\210\336\201]\201^#\210\336\201_\201`#\210\336\201a\201b#\210\336\201c\201d#\210\336\201e\201f#\210\336\201g\201h#\210\336\201i\201j#\210\336\201k\201l#\210\336\201m\201n#\210\336\201o\201p#\210\336\201q\201r#\210\336\201s\201t#\210\336\201u\201v#\210\336\201w\201x#\210\336\201y\201z#\210\336\201{\201|#\210\336\201}\201~#\210\336\201\201\200#\210\336\201\201\201\202#\210\336\201\203\201\204#\210\336\201\205\201\206#\210\336\201\207\201\210#\210\336\201\211\201\212#\210\336\201\213\201\214#\210\336\201\215\201\216#\210\336\201\217\201\220#\210\201\221\201\222\201\223\201\224\201\225DD\201\226\201\227\201\230\201\231\201\232&\210\201\221\201\233\201\223\201\224\201\234DD\201\235\201\227\201\230\201\231\201\236&\210\201\221\201\237\201\223\201\224\201\240DD\201\241\201\227\201\230\201\242\201\243\201\231\201\244& \207" [org-mode-map org-use-extra-keys window-system define-key [menu-bar headings] undefined [menu-bar hide] [menu-bar show] [remap outline-mark-subtree] org-mark-subtree [remap outline-show-subtree] org-show-subtree [remap outline-forward-same-level] org-forward-heading-same-level [remap outline-backward-same-level] org-backward-heading-same-level [remap outline-show-branches] org-kill-note-or-show-branches [remap outline-promote] org-promote-subtree [remap outline-demote] org-demote-subtree [remap outline-insert-heading] org-ctrl-c-ret [remap outline-next-visible-heading] org-next-visible-heading [remap outline-previous-visible-heading] org-previous-visible-heading [remap show-children] org-show-children org-defkey "" make-sparse-keymap " " org-cycle [tab] [3 C-tab] org-force-cycle-archived [M-tab] nil [134217737] [27 tab] " " [S-iso-leftab] org-shifttab [S-tab] [33554441] [backtab] [S-return] org-table-copy-down [33554445] [M-S-return] org-insert-todo-heading [167772173] [27 S-return] [27 33554445] [M-return] org-meta-return [134217741] [27 return] "
" [M-left] org-metaleft [M-right] org-metaright [27 right] [M-up] org-metaup [27 up] [M-down] org-metadown [27 down] [C-M-S-right] org-increase-number-at-point [C-M-S-left] org-decrease-number-at-point [M-S-left] org-shiftmetaleft [27 S-left] [M-S-right] org-shiftmetaright [27 S-right] [M-S-up] org-shiftmetaup [27 S-up] [M-S-down] org-shiftmetadown [27 S-down] [S-up] org-shiftup [S-down] org-shiftdown [S-left] org-shiftleft [S-right] org-shiftright [C-S-right] org-shiftcontrolright [C-S-left] org-shiftcontrolleft [C-S-up] org-shiftcontrolup [C-S-down] org-shiftcontroldown "c" "m" "M" "
" [27 left] "l" [27 right] "r" "u" "d" "L" "R" "U" "D" [3 up] [3 down] [3 left] [3 right] [3 24 right] [3 24 left] "ns" org-narrow-to-subtree "nb" org-narrow-to-block "ne" org-narrow-to-element org-remap self-insert-command org-self-insert-command delete-char org-delete-char delete-backward-char org-delete-backward-char kill-line org-kill-line open-line org-open-line yank org-yank comment-dwim org-comment-dwim move-beginning-of-line org-beginning-of-line move-end-of-line org-end-of-line forward-paragraph org-forward-paragraph backward-paragraph org-backward-paragraph backward-sentence org-backward-sentence forward-sentence org-forward-sentence fill-paragraph org-fill-paragraph delete-indentation org-delete-indentation transpose-words org-transpose-words "|" org-force-self-insert "" org-reveal [134217748] org-transpose-element [134217853] org-forward-element "}" [134217851] org-backward-element "{" " " org-up-element " " org-down-element "" "" [3 134217830] org-next-block [3 134217826] org-previous-block "$" org-archive-subtree "" "" org-archive-subtree-default org-insert-drawer "a" org-toggle-archive-tag "A" org-archive-to-archive-sibling "b" org-tree-to-indirect-buffer "q" org-toggle-tags-groups "\n" org-goto "" org-todo "" org-set-tags-command "" org-schedule "" org-deadline ";" org-toggle-comment "" org-refile [3 134217847] org-refile-copy "/" org-sparse-tree "\\" org-match-sparse-tree "
" org-clone-subtree-with-time-shift "v" org-copy-visible [C-return] org-insert-heading-respect-content [C-S-return] org-insert-todo-heading-respect-content "" org-next-link "" org-previous-link "\f" org-insert-link [3 134217836] org-insert-last-stored-link [3 134217740] org-insert-all-links "" org-open-at-point "%" org-mark-ring-push "&" org-mark-ring-goto "" org-add-note "." org-time-stamp "!" org-time-stamp-inactive "," org-priority "" org-evaluate-time-range ">" org-goto-calendar "<" org-date-from-calendar [67108908] org-cycle-agenda-files [67108903] "[" org-agenda-file-to-front "]" org-remove-file "<" org-agenda-set-restriction-lock ">" org-agenda-remove-restriction-lock "-" org-ctrl-c-minus "*" org-ctrl-c-star " " org-ctrl-c-tab "^" org-sort "" org-ctrl-c-ctrl-c " " "#" org-update-statistics-cookies "
" org-return "\n" org-return-and-maybe-indent "?" org-table-field-info " " org-table-blank-field "+" org-table-sum "=" org-table-eval-formula "'" org-edit-special "`" org-table-edit-field "\"a" orgtbl-ascii-plot "\"g" org-plot/gnuplot "|" org-table-create-or-convert-from-region [67108899] org-table-rotate-recalc-marks "~" org-table-create-with-table\.el "" org-attach "}" org-table-toggle-coordinate-overlays "{" org-table-toggle-formula-debugger "" org-export-dispatch ":" org-toggle-fixed-width "" org-emphasize "f" org-footnote-action "@" [134217832] org-mark-element "h" [3 67108906] org-list-make-subtree "" org-cut-special [3 24 134217847] org-copy-special "" org-paste-special "" org-toggle-time-stamp-overlays " " org-clock-in "" org-clock-in-last "" org-resolve-clocks "" org-clock-out "\n" org-clock-goto "" org-clock-cancel "" org-clock-display "x" org-dynamic-block-insert-dblock "" org-dblock-update "\f" org-latex-preview "" org-toggle-inline-images [3 24 134217750] org-redisplay-inline-images "\\" org-toggle-pretty-entities "" org-toggle-checkbox "" org-toggle-radio-button "p" org-set-property "P" org-set-property-and-value "e" org-set-effort "E" org-inc-effort "o" org-toggle-ordered-property [3 67108908] org-insert-structure-template "." org-timer "-" org-timer-item "0" org-timer-start "_" org-timer-stop ";" org-timer-set-timer "," org-timer-pause-or-continue "" org-columns "!" org-reload "g" org-feed-update-all "G" org-feed-goto-inbox "[" org-reftex-citation "I" org-info-find-node custom-declare-variable org-use-speed-commands funcall function #[0 "\300\207" [nil] 1] "Non-nil means activate single letter commands at beginning of a headline.\nThis may also be a function to test for appropriate locations where speed\ncommands should be active.\n\nFor example, to activate speed commands when the point is on any\nstar at the beginning of the headline, you can do this:\n\n (setq org-use-speed-commands\n (lambda () (and (looking-at org-outline-regexp) (looking-back \"^\\**\"))))" :group org-structure :type (choice (const :tag "Never" nil) (const :tag "At beginning of headline stars" t) (function)) org-speed-commands-user #[0 "\300\207" [nil] 1] "Alist of additional speed commands.\nThis list will be checked before `org-speed-commands-default'\nwhen the variable `org-use-speed-commands' is non-nil\nand when the cursor is at the beginning of a headline.\nThe car of each entry is a string with a single letter, which must\nbe assigned to `self-insert-command' in the global map.\nThe cdr is either a command to be called interactively, a function\nto be called, or a form to be evaluated.\nAn entry that is just a list with a single string will be interpreted\nas a descriptive headline that will be added when listing the speed\ncommands in the Help buffer using the `?' speed command." (repeat :value ("k" . ignore) (choice :value ("k" . ignore) (list :tag "Descriptive Headline" (string :tag "Headline")) (cons :tag "Letter and Command" (string :tag "Command letter") (choice (function) (sexp))))) org-speed-command-hook #[0 "\300\207" [(org-speed-command-activate org-babel-speed-command-activate)] 1] "Hook for activating speed commands at strategic locations.\nHook functions are called in sequence until a valid handler is\nfound.\n\nEach hook takes a single argument, a user-pressed command key\nwhich is also a `self-insert-command' from the global map.\n\nWithin the hook, examine the cursor position and the command key\nand return nil or a valid handler as appropriate. Handler could\nbe one of an interactive command, a function, or a form.\n\nSet `org-use-speed-commands' to non-nil value to enable this\nhook. The default setting is `org-speed-command-activate'." :version "24.1" hook] 34)
#@29 The default speed commands.
(defconst org-speed-commands-default '(("Outline Navigation") ("n" org-speed-move-safe 'org-next-visible-heading) ("p" org-speed-move-safe 'org-previous-visible-heading) ("f" org-speed-move-safe 'org-forward-heading-same-level) ("b" org-speed-move-safe 'org-backward-heading-same-level) ("F" . org-next-block) ("B" . org-previous-block) ("u" org-speed-move-safe 'outline-up-heading) ("j" . org-goto) ("g" org-refile t) ("Outline Visibility") ("c" . org-cycle) ("C" . org-shifttab) (" " . org-display-outline-path) ("s" . org-toggle-narrow-to-subtree) ("k" . org-cut-subtree) ("=" . org-columns) ("Outline Structure Editing") ("U" . org-metaup) ("D" . org-metadown) ("r" . org-metaright) ("l" . org-metaleft) ("R" . org-shiftmetaright) ("L" . org-shiftmetaleft) ("i" progn (forward-char 1) (call-interactively 'org-insert-heading-respect-content)) ("^" . org-sort) ("w" . org-refile) ("a" . org-archive-subtree-default-with-confirmation) ("@" . org-mark-subtree) ("#" . org-toggle-comment) ("Clock Commands") ("I" . org-clock-in) ("O" . org-clock-out) ("Meta Data Editing") ("t" . org-todo) ("," org-priority) ("0" org-priority 32) ("1" org-priority 65) ("2" org-priority 66) ("3" org-priority 67) (":" . org-set-tags-command) ("e" . org-set-effort) ("E" . org-inc-effort) ("W" lambda (m) (interactive "sMinutes before warning: ") (org-entry-put (point) "APPT_WARNTIME" m)) ("Agenda Views etc") ("v" . org-agenda) ("/" . org-sparse-tree) ("Misc") ("o" . org-open-at-point) ("?" . org-speed-command-help) ("<" org-agenda-set-restriction-lock 'subtree) (">" org-agenda-remove-restriction-lock)) (#$ . 20605))
#@10
(fn E)
(defalias 'org-print-speed-command #[257 "\211@G\300V\203\" \301\302!\210\301@!\210\301\302!\210\301\303@G\304\"!\210\301\302!\207\301@!\210\301\305!\210\211A9\203; \301\306A!!\210\202@ \307A!\210\301\302!\207" [1 princ "\n" make-string 45 " " symbol-name prin1] 5 (#$ . 22245)])
#@36 Show the available speed commands.
(defalias 'org-speed-command-help #[0 "\204 \306\307!\210 r\310\311!q\210p\312 \210\313\211\314\211\314 \315 \210\316\317!\210+\211 \320\321!\210\322\323\"\210\320\324!\210\320\325!\210\322\323\"\210\326!\210)\266r\311q\210\314\211)\207" [org-use-speed-commands default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks user-error "Speed commands are not activated, customize `org-use-speed-commands'" get-buffer-create "*Help*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook princ "User-defined Speed commands\n===========================\n" mapc org-print-speed-command "\n" "Built-in Speed commands\n=======================\n" internal-temp-output-buffer-show inhibit-read-only standard-output org-speed-commands-user org-speed-commands-default truncate-lines] 6 (#$ . 22547) nil])
#@144 Execute CMD, but make sure that the cursor always ends up in a headline.
If not, return to the original position and throw an error.
(fn CMD)
(defalias 'org-speed-move-safe #[257 "`\300!\210n\205 \301 ?\205 \211b\210\302\303\"\207" [call-interactively org-at-heading-p error "Boundary reached while executing %s"] 5 (#$ . 23460) nil])
#@181 Hook for activating single-letter speed commands.
`org-speed-commands-default' specifies a minimal command set.
Use `org-speed-commands-user' for further customization.
(fn KEYS)
(defalias 'org-speed-command-activate #[257 "n\203\n \304!\204 \305 !\205 \205 \306\307\n \"\"A\207" [org-outline-regexp org-use-speed-commands org-speed-commands-user org-speed-commands-default looking-at functionp assoc append] 6 (#$ . 23807)])
#@211 The key prefix for Babel interactive key-bindings.
See `org-babel-key-bindings' for the list of interactive Babel
functions which are assigned key bindings, and see
`org-babel-map' for the actual babel keymap.
(defvar org-babel-key-prefix "" (#$ . 24248))
#@45 The keymap for interactive Babel functions.
(defvar org-babel-map (make-sparse-keymap) (#$ . 24512))
#@288 Alist of key bindings and interactive Babel functions.
This list associates interactive Babel functions
with keys. Each element of this list will add an entry to the
`org-babel-map' using the letter key which is the `car' of the
a-list placed behind the generic `org-babel-key-prefix'.
(defvar org-babel-key-bindings '(("p" . org-babel-previous-src-block) ("" . org-babel-previous-src-block) ("n" . org-babel-next-src-block) ("" . org-babel-next-src-block) ("e" . org-babel-execute-maybe) ("" . org-babel-execute-maybe) ("o" . org-babel-open-src-block-result) ("" . org-babel-open-src-block-result) ("" . org-babel-expand-src-block) ("v" . org-babel-expand-src-block) ("u" . org-babel-goto-src-block-head) ("" . org-babel-goto-src-block-head) ("g" . org-babel-goto-named-src-block) ("r" . org-babel-goto-named-result) ("" . org-babel-goto-named-result) ("" . org-babel-execute-buffer) ("b" . org-babel-execute-buffer) ("" . org-babel-execute-subtree) ("s" . org-babel-execute-subtree) ("" . org-babel-demarcate-block) ("d" . org-babel-demarcate-block) ("" . org-babel-tangle) ("t" . org-babel-tangle) ("" . org-babel-tangle-file) ("f" . org-babel-tangle-file) ("" . org-babel-check-src-block) ("c" . org-babel-check-src-block) ("\n" . org-babel-insert-header-arg) ("j" . org-babel-insert-header-arg) ("\f" . org-babel-load-in-session) ("l" . org-babel-load-in-session) (" " . org-babel-lob-ingest) ("i" . org-babel-lob-ingest) (" " . org-babel-view-src-block-info) ("I" . org-babel-view-src-block-info) ("" . org-babel-switch-to-session) ("z" . org-babel-switch-to-session-with-code) ("" . org-babel-sha1-hash) ("a" . org-babel-sha1-hash) ("h" . org-babel-describe-bindings) ("" . org-babel-do-key-sequence-in-edit-buffer) ("x" . org-babel-do-key-sequence-in-edit-buffer) ("k" . org-babel-remove-result-one-or-many) ("\210" . org-babel-mark-block)) (#$ . 24620))
(byte-code "\304 \n#\210 \211\203! \211@\211@A\211\304\n#\266A\266\202\202 \207" [org-mode-map org-babel-key-prefix org-babel-map org-babel-key-bindings define-key] 10)
#@67 Hook for activating single-letter code block commands.
(fn KEYS)
(defalias 'org-babel-speed-command-activate #[257 "n\205 \302\303\304!)\205 \305\306 !\307=\205 \310 \"A\207" [case-fold-search org-babel-key-bindings t looking-at "[ ]*#\\+begin_src" org-element-type org-element-at-point src-block assoc] 4 (#$ . 26683)])
#@57 Describe all keybindings behind `org-babel-key-prefix'.
(defalias 'org-babel-describe-bindings #[0 "\301!\207" [org-babel-key-prefix describe-bindings] 2 (#$ . 27017) nil])
(provide 'org-keys)
Zerion Mini Shell 1.0