;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311\312\313&\210\314\315\306\316\312\305\317\320&\210\314\321\306\322\312\305\317\320&\210\314\323\306\324\312\305\317\320&\210\325\326\327\330\331\332%\207" [require org bookmark ol custom-declare-group org-bookmark nil "Options concerning the bookmark link." :tag "Org Startup" :group org-link custom-declare-variable org-bookmark-in-dired "Use org-bookmark in dired." :type boolean org-bookmark-when-visiting-a-file "Use org-bookmark in any buffer visiting a file." org-bookmark-use-first-bookmark "If several bookmarks links to the buffer, take the first one.\nOtherwise prompt the user for the right bookmark to use." org-link-set-parameters "bookmark" :follow org-bookmark-open :store org-bookmark-store-link] 8) #@30 Visit the bookmark BOOKMARK. (defalias 'org-bookmark-open #[(bookmark _) "\301!\207" [bookmark bookmark-jump] 2 (#$ . 882)]) #@63 Store a link to the current line's bookmark in bookmark list. (defalias 'org-bookmark-store-link #[nil "\306\211\211 \203\f\307=\203\310\311 !\202* \203*\312\313 !\203*\310\312\313 !!\n\204:\f\314=\203j\315 \202j\316\317\320 \"\211\203j\321\306\"\211\203jG\322=\204Y\203^@\202i\323\324\306\325\306\211@& \205v\326\327\330 P\331 $+\207" [bmks bookmark file org-bookmark-in-dired major-mode org-bookmark-when-visiting-a-file nil dired-mode abbreviate-file-name dired-get-filename buffer-file-name buffer-base-buffer bookmark-bmenu-mode bookmark-bmenu-bookmark mapcar #[(name) "\302\303 !!\232\205 \207" [file name abbreviate-file-name bookmark-location] 4] bookmark-all-names delete 1 completing-read "Bookmark: " t org-store-link-props :link "bookmark:" :description org-bookmark-use-first-bookmark] 8 (#$ . 1014)]) (provide 'ol-bookmark)