;ELC ;;; Compiled ;;; in Emacs version 29.4 ;;; with all optimizations. (byte-code "\300\301!\210\302 \303\232\204\304\305\306\"\210\300\307!\210\300\310!\210\300\311!\210\312\313\314\315\316\317%\207" [require org-macs org-release "9.6.15" warn "Org version mismatch.\nThis warning usually appears when a built-in Org version is loaded\nprior to the more recent Org version.\n\nVersion mismatch is commonly encountered in the following situations:\n\n1. Emacs is loaded using literate Org config and more recent Org\n version is loaded inside the file loaded by `org-babel-load-file'.\n `org-babel-load-file' triggers the built-in Org version clashing\n the newer Org version attempt to be loaded later.\n\n It is recommended to move the Org loading code before the\n `org-babel-load-file' call.\n\n2. New Org version is loaded manually by setting `load-path', but some\n other package depending on Org is loaded before the `load-path' is\n configured.\n This \"other package\" is triggering built-in Org version, again\n causing the version mismatch.\n\n It is recommended to set `load-path' as early in the config as\n possible.\n\n3. New Org version is loaded using straight.el package manager and\n other package depending on Org is loaded before straight triggers\n loading of the newer Org version.\n\n It is recommended to put\n\n %s\n\n early in the config. Ideally, right after the straight.el\n bootstrap. Moving `use-package' :straight declaration may not be\n sufficient if the corresponding `use-package' statement is\n deferring the loading.\n\n4. A new Org version is synchronized with Emacs git repository and\n stale .elc files are still left from the previous build.\n\n It is recommended to remove .elc files from lisp/org directory and\n re-compile." "(straight-use-package 'org)" ol cl-lib eww org-link-set-parameters "eww" :follow org-eww-open :store org-eww-store-link] 6)#@54 Open URL with Eww in the current buffer. (fn URL _) (defalias 'org-eww-open #[514 "\300!\207" [eww] 4 (#$ . 1957)])#@43 Store a link to the url of an EWW buffer. (defalias 'org-eww-store-link #[0 "\302=\205\303\304\305\306\307 \310\311\312!\313\314 \315\"\206\307 &\207" [major-mode eww-data eww-mode org-link-store-props :type "eww" :link eww-current-url :url url-view-url t :description plist-get :title] 11 (#$ . 2080)])#@88 Move to the start of next link if exists. Otherwise point is not moved. Return point. (defalias 'org-eww-goto-next-url-property-change #[0 "\300`\301\"\206`b\207" [next-single-property-change shr-url] 3 (#$ . 2395)])#@49 Non-nil if there is a next url property change. (defalias 'org-eww-has-further-url-property-change-p #[0 "\212`\300 )=?\207" [org-eww-goto-next-url-property-change] 2 (#$ . 2620)])#@71 Return the url below point if there is an url; otherwise, return nil. (defalias 'org-eww-url-below-point #[0 "\300`\301\"\207" [get-text-property shr-url] 3 (#$ . 2806)])#@383 Copy current buffer content or active region with `org-mode' style links. This will encode `link-title' and `link-location' with `org-link-make-string' and insert the transformed text into the kill ring, so that it can be yanked into an Org mode buffer with links working correctly. Further lines starting with a star get quoted with a comma to keep the structure of the Org file. (defalias 'org-eww-copy-for-org-mode #[0 "\300 ed\301\211\211\211\211\203\302 \262\303 \262\304 \210\305\306!\210\212b\210\211\204~\307 \203~`\262\310 \2046\311 \210\310 \204B\312\313\314\301\211$\210`X\203u`W\203V`{P\262\310 \262`\311 {\262\315!\203n\316\"\202oP\262\202\"b\210\317\262\202\"`W\203\215`{P\262\320\321\322\323#!\210\305\324!)\207" [org-region-active-p nil region-beginning region-end deactivate-mark message "Transforming links..." org-eww-has-further-url-property-change-p org-eww-url-below-point org-eww-goto-next-url-property-change cl--assertion-failed (org-eww-url-below-point) "program logic error: point must have an url below but it hasn't" org-string-nw-p org-link-make-string t org-kill-new replace-regexp-in-string "^\\*" ",*" "Transforming links...done, use C-y to insert text into Org mode file"] 13 (#$ . 2983) nil]) (defalias 'org-eww-extend-eww-keymap #[0 "\301\302\303#\210\301\304\303#\207" [eww-mode-map define-key "\367" org-eww-copy-for-org-mode ""] 4]) (byte-code "\301\300!\203\302!\203\303 \210\304\305\303\"\210\306\307!\207" [eww-mode-map boundp keymapp org-eww-extend-eww-keymap add-hook eww-mode-hook provide ol-eww] 3)