MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.218.164.141
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/org/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/org/org-bibtex.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:56 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/org/org-bibtex.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
     (< (aref emacs-version (1- (length emacs-version))) ?A)
     (string-lessp emacs-version "23")
     (error "`%s' was compiled for Emacs 23 or later" #$))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require org bibtex org-compat] 2)
(defvar org-bibtex-description nil)
#@59 Bibtex entry types with required and optional parameters.
(defvar org-bibtex-types '((:article (:description . "An article from a journal or magazine") (:required :author :title :journal :year) (:optional :volume :number :pages :month :note)) (:book (:description . "A book with an explicit publisher") (:required (:editor :author) :title :publisher :year) (:optional (:volume :number) :series :address :edition :month :note)) (:booklet (:description . "A work that is printed and bound, but without a named publisher or sponsoring institution.") (:required :title) (:optional :author :howpublished :address :month :year :note)) (:conference (:description . "") (:required :author :title :booktitle :year) (:optional :editor :pages :organization :publisher :address :month :note)) (:inbook (:description . "A part of a book, which may be a chapter (or section or whatever) and/or a range of pages.") (:required (:author :editor) :title (:chapter :pages) :publisher :year) (:optional :crossref (:volume :number) :series :type :address :edition :month :note)) (:incollection (:description . "A part of a book having its own title.") (:required :author :title :booktitle :publisher :year) (:optional :crossref :editor (:volume :number) :series :type :chapter :pages :address :edition :month :note)) (:inproceedings (:description . "An article in a conference proceedings") (:required :author :title :booktitle :year) (:optional :crossref :editor (:volume :number) :series :pages :address :month :organization :publisher :note)) (:manual (:description . "Technical documentation.") (:required :title) (:optional :author :organization :address :edition :month :year :note)) (:mastersthesis (:description . "A Master’s thesis.") (:required :author :title :school :year) (:optional :type :address :month :note)) (:misc (:description . "Use this type when nothing else fits.") (:required) (:optional :author :title :howpublished :month :year :note)) (:phdthesis (:description . "A PhD thesis.") (:required :author :title :school :year) (:optional :type :address :month :note)) (:proceedings (:description . "The proceedings of a conference.") (:required :title :year) (:optional :editor (:volume :number) :series :address :month :organization :publisher :note)) (:techreport (:description . "A report published by a school or other institution.") (:required :author :title :institution :year) (:optional :type :address :month :note)) (:unpublished (:description . "A document having an author and title, but not formally published.") (:required :author :title :note) (:optional :month :year))) (#$ . 681))
#@34 Bibtex fields with descriptions.
(defvar org-bibtex-fields '((:address . "Usually the address of the publisher or other type of institution.  For major publishing houses, van Leunen recommends omitting the information entirely.  For small publishers, on the other hand, you can help the reader by giving the complete address.") (:annote . "An annotation.  It is not used by the standard bibliography styles, but may be used by others that produce an annotated bibliography.") (:author . "The name(s) of the author(s), in the format described in the LaTeX book.  Remember, all names are separated with the and keyword, and not commas.") (:booktitle . "Title of a book, part of which is being cited.  See the LaTeX book for how to type titles.  For book entries, use the title field instead.") (:chapter . "A chapter (or section or whatever) number.") (:crossref . "The database key of the entry being cross referenced.") (:edition . "The edition of a book for example, 'Second'.  This should be an ordinal, and should have the first letter capitalized, as shown here; the standard styles convert to lower case when necessary.") (:editor . "Name(s) of editor(s), typed as indicated in the LaTeX book.  If there is also an author field, then the editor field gives the editor of the book or collection in which the reference appears.") (:howpublished . "How something strange has been published.  The first word should be capitalized.") (:institution . "The sponsoring institution of a technical report.") (:journal . "A journal name.") (:key . "Used for alphabetizing, cross-referencing, and creating a label when the author information is missing.  This field should not be confused with the key that appears in the cite command and at the beginning of the database entry.") (:month . "The month in which the work was published or, for an unpublished work, in which it was written.  You should use the standard three-letter abbreviation,") (:note . "Any additional information that can help the reader.  The first word should be capitalized.") (:number . "Any additional information that can help the reader.  The first word should be capitalized.") (:organization . "The organization that sponsors a conference or that publishes a manual.") (:pages . "One or more page numbers or range of numbers, such as 42-111 or 7,41,73-97 or 43+ (the ‘+’ in this last example indicates pages following that don’t form simple range). BibTEX requires double dashes for page ranges (--).") (:publisher . "The publisher’s name.") (:school . "The name of the school where a thesis was written.") (:series . "The name of a series or set of books.  When citing an entire book, the the title field gives its title and an optional series field gives the name of a series or multi-volume set in which the book is published.") (:title . "The work’s title, typed as explained in the LaTeX book.") (:type . "The type of a technical report for example, 'Research Note'.") (:volume . "The volume of a journal or multi-volume book.") (:year . "The year of publication or, for an unpublished work, the year it was written.  Generally it should consist of four numerals, such as 1984, although the standard styles can handle any year whose last four nonpunctuation characters are numerals, such as '(about 1984)'")) (#$ . 3287))
#@37 List to hold parsed bibtex entries.
(defvar org-bibtex-entries nil (#$ . 6602))
(byte-code "\300\301\302\303\304\305\306\307\310\311&	\210\300\312\302\313\304\305\306\307\310\314&	\210\300\315\316\317\304\305\306\307\310\311&	\210\300\320\302\321\304\305\306\307\310\311&	\210\300\322\323\324\304\305\306\307\310\314&	\210\300\325\302\326\304\305\306\307\310\327&	\210\300\330\302\331\304\305\306\307\310\311&	\210\300\332\302\333\304\305\306\307\310\334&	\210\300\335\336\337\304\305\306\307\310\314&	\207" [custom-declare-variable org-bibtex-autogen-keys nil "Set to a truth value to use `bibtex-generate-autokey' to generate keys." :group org-bibtex :version "24.1" :type boolean org-bibtex-prefix "Optional prefix for all bibtex property names.\nFor example setting to 'BIB_' would allow interoperability with fireforg." string org-bibtex-treat-headline-as-title t "Treat headline text as title if title property is absent.\nIf an entry is missing a title property, use the headline text as\nthe property.  If this value is t, `org-bibtex-check' will ignore\na missing title field." org-bibtex-export-arbitrary-fields "When converting to bibtex allow fields not defined in `org-bibtex-fields'.\nThis only has effect if `org-bibtex-prefix' is defined, so as to\nensure that other org-properties, such as CATEGORY or LOGGING are\nnot placed in the exported bibtex entry." org-bibtex-key-property "CUSTOM_ID" "Property that holds the bibtex key.\nBy default, this is CUSTOM_ID, which enables easy linking to\nbibtex headlines from within an org file.  This can be set to ID\nto enable global links, but only with great caution, as global\nIDs must be unique." org-bibtex-tags "List of tag(s) that should be added to new bib entries." (repeat :tag "Tag" (string)) org-bibtex-tags-are-keywords "Convert the value of the keywords field to tags and vice versa.\nIf set to t, comma-separated entries in a bibtex entry's keywords\nfield will be converted to org tags.  Note: spaces will be escaped\nwith underscores, and characters that are not permitted in org\ntags will be removed.\n\nIf t, local tags in an org entry will be exported as a\ncomma-separated string of keywords when exported to bibtex.  Tags\ndefined in `org-bibtex-tags' or `org-bibtex-no-export-tags' will\nnot be exported." org-bibtex-no-export-tags "List of tag(s) that should not be converted to keywords.\nThis variable is relevant only if `org-bibtex-export-tags-as-keywords' is t." (repeat :tag "Tag" (string)) org-bibtex-type-property-name "btype" "Property in which to store bibtex entry type (e.g., article)."] 10)
(defalias 'org-bibtex-get #[(property) "\304\305\306!\"\307`	\226\"\206\307`\n	\226P\")\211\205\310!)\207" [org-special-properties property org-bibtex-prefix it delete "FILE" copy-sequence org-entry-get org-babel-trim] 5])
(defalias 'org-bibtex-put #[(property value) "\305!\203\306!\307\310O\202\226\311\n	\230?\205	P\f\")\207" [property prop org-bibtex-key-property org-bibtex-prefix value keywordp symbol-name 1 nil org-set-property] 3])
#@58 Return a bibtex entry of the given headline as a string.
(defalias 'org-bibtex-headline #[nil "\306\307\310\311\312\313 \314
!)\314*!+,\205%\315\311\316\317\320 \"\"-+\205\246\321\322+)\323\324\325\311.\203J/\203J\316\326\327\311\330\"\"\202e\316\331\332	+!0\"\"\333	+!0\"\"\"\"\"\334#$1\335\336!2r2q\210\337\2161c\210-\203\243\340 \210\341\342\311\343#\203\225\344\225b\210\345c\210\202\233\346\347\343\211#\210\323\350-\345#c\210\313 ,.	\207" [val to from flatten notes org-bibtex-key-property #[(key lst) "\302	\"A\207" [key lst assoc] 3] #[(string) "\301\302P!\207" [string intern ":"] 3] #[(key) "\301!\302\303O\207" [key symbol-name 1 nil] 3] nil #[(&rest lsts) "\301\302\303\304\"\"\207" [lsts apply append mapcar #[(e) "<\203\n\302	\"\207C\207" [e flatten apply] 3]] 5] buffer-string org-bibtex-get delq mapcar #[(tag) "\303	\n\"\235?\205\207" [tag org-bibtex-tags org-bibtex-no-export-tags append] 4] org-get-local-tags-at format "@%s{%s,\n%s\n}\n" mapconcat #[(pair) "\301\302@A#\207" [pair format "  %s={%s}"] 4] remove #[(kv) "@A\305\n\"\205 \fP\227\n\227\230?\205 \306\307\n#\227	B*\207" [kv val0 key org-bibtex-prefix org-bibtex-type-property-name string-match replace-regexp-in-string ""] 4] org-entry-properties standard #[(field) "\303	!!\206	\304\232\205\305\306 8\211\205	!\nB)\207" [from field value org-bibtex-get :title 4 org-heading-components] 4] :required :optional ",\n" generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) bibtex-beginning-of-entry re-search-forward "keywords.*=.*{\\(.*\\)}" t 1 ", " bibtex-make-field "keywords" identity id org-bibtex-type-property-name type org-bibtex-tags-are-keywords tags org-bibtex-export-arbitrary-fields org-bibtex-prefix org-bibtex-types entry #1#] 17 (#$ . 9657)])
(defalias 'org-bibtex-ask #[(field) "\306	\"\204\f\307\310\"\210\311 \312\216\313!\314\315O\316\317\"
r\320\f!q\210p\321 \210\315\211 \322\211!\322\"#\323 \210\324\325!\210+\211$%\326\306	\"A!\210\327$!\210+r\fq\210\330\322!\210)\331\332\f!!\210\333\316\334\"!\211&G\335V\205w&-\207" [field org-bibtex-fields #1=#:wconfig name buf-name default-directory assoc error "Field:%s is not known" current-window-configuration ((set-window-configuration #1#)) symbol-name 1 nil format "*Bibtex Help %s*" get-buffer-create kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook princ internal-temp-output-buffer-show longlines-mode org-fit-window-to-buffer get-buffer-window read-from-minibuffer "%s: " 0 #2=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #3=#:buf standard-output result] 5])
#@47 Generate an autokey for the current headline.
(defalias 'org-bibtex-autokey #[nil "\306	\203<\307 \310\311!rq\210\312\216\nc\210\313 +\314\232\2037\315\316!\2037\317
!\2037\320\f
\"\2037\321\322!\210\f*\202?\323\324!\"\207" [org-bibtex-key-property org-bibtex-autogen-keys entry #1=#:temp-buffer key org-id-locations org-bibtex-put org-bibtex-headline generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) bibtex-generate-autokey "ID" featurep org-id hash-table-p gethash warn "Another entry has the same ID" read-from-minibuffer "id: "] 5 (#$ . 12428)])
#@135 Fleshout current heading, ensuring all required fields are present.
With optional argument OPTIONAL, also prompt for optional fields.
(defalias 'org-bibtex-fleshout #[(type &optional optional) "\306\307\310\311\203\312\313\n\314\n\f
\"\"\"\202\n\314\n\f
\"\"\205+\n\315\n\f
\"\"\"\316\211\203\201@\211:\203[\312\316\317\320\"\"@\211\206X	\321\322\317\"\"!)!\323!\204w\324!\211\203v\325\"\210))A\211\2045-\f\205\227\326\f
\"\205\227\323!?\205\227\327 \207" [name keyword val org-bibtex-treat-headline-as-title type org-bibtex-types #[(key lst) "\302	\"A\207" [key lst assoc] 3] #[(name) "\301\302\227P!\207" [name intern ":"] 3] #[(keyword) "\301!\302\303O\207" [keyword symbol-name 1 nil] 3] append remove :title :required :optional nil mapcar #[(f) "\302	!!\205		\207" [name f org-bibtex-get] 3] org-icompleting-read "Field: " org-bibtex-get org-bibtex-ask org-bibtex-put assoc org-bibtex-autokey optional field --dolist-tail-- present prop org-bibtex-key-property] 9 (#$ . 13058)])
(byte-code "\300\301\302\"\210\303\304\305\"\207" [org-add-link-type "bibtex" org-bibtex-open add-hook org-store-link-functions org-bibtex-store-link] 3)
#@39 Visit the bibliography entry on PATH.
(defalias 'org-bibtex-open #[(path) "\302\303\"\205\304\305\"\306\211\224O\307\310\311	$*\207" [path search string-match "::\\(.+\\)\\'" match-string 1 0 org-open-file t nil] 5 (#$ . 14262)])
#@33 Store a link to a BibTeX entry.
(defalias 'org-bibtex-store-link #[nil "\306=\205\352\307 \310\311\n!\312	R\313\314\212\315 \210\316 )\"\317\320\321\322\f\"A\323\321\324\f\"A\206-\325\326\321\327\f\"A\2067\330\331\321\332\f\"A\206A\333\334\321\335\f\"A\206K\336\337\321\340\f\"A\206U\341\342\321\343\f\"A\206_\344\345\321\346\f\"A\206i\347\350\321\351\f\"A\206s\352\353\321\354\f\"A\206}\355\356\321\357\f\"A\206\207\360\361\321\362\f\"A\206\221\363\364\321\365\f\"A\206\233\366\367\321\370\f\"A\206\245\371\372\321\373\f\"A\206\257\374\375\321\376\f\"A\206\271\377\201@\321\201A\f\"A\206\311\201B\201C\321\201D\f\"A\206\331\201E\201F\201G\201H\201I
&*+\207" [major-mode search buffer-file-name link entry org-bibtex-description bibtex-mode org-create-file-search-in-bibtex "file:" abbreviate-file-name "::" mapcar #[(c) "\301\302A\"\203@\303\304A\"B\207\207" [c string-match "^\\(?:{\\|\"\\)\\(.*\\)\\(?:}\\|\"\\)$" match-string 1] 4] bibtex-beginning-of-entry bibtex-parse-entry org-store-link-props :key assoc "=key=" :author "author" "[no author]" :editor "editor" "[no editor]" :title "title" "[no title]" :booktitle "booktitle" "[no booktitle]" :journal "journal" "[no journal]" :publisher "publisher" "[no publisher]" :pages "pages" "[no pages]" :url "url" "[no url]" :year "year" "[no year]" :month "month" "[no month]" :address "address" "[no address]" :volume "volume" "[no volume]" :number "number" "[no number]" :annote "annote" "[no annotation]" :series "series" "[no series]" :abstract "abstract" "[no abstract]" :btype "=type=" "[no type]" :type "bibtex" :link :description] 43 (#$ . 14506)])
#@71 Create the search string and description for a BibTeX database entry.
(defalias 'org-create-file-search-in-bibtex #[nil "\306\211\307\310\311\312\313\314\313\307\315\316\317 .\f\212\320 \210\321\322\323 \"A)\207" [bibtex-autokey-year-title-separator bibtex-autokey-titleword-length bibtex-autokey-titleword-case-convert-function bibtex-autokey-titleword-separator bibtex-autokey-titlewords bibtex-autokey-name-year-separator 1 identity " & " " et al." 4 " " 3 infty ": " bibtex-generate-autokey bibtex-beginning-of-entry assoc "=key=" bibtex-parse-entry bibtex-autokey-year-length bibtex-autokey-additional-names bibtex-autokey-name-separator bibtex-autokey-name-case-convert-function bibtex-autokey-names-stretch bibtex-autokey-names org-bibtex-description] 12 (#$ . 16159)])
#@62 Find the link search string S as a key for a database entry.
(defalias 'org-execute-file-search-in-bibtex #[(s) "\306=\205@eb\210\307\310\311	!\312Q\313\314#\203\315\224b\210\315\224\203;\n\316\232\203;p`\317
!\210r\fq\210b\210\320 \210+\202?\321\315!\210\314\207" [major-mode s current-prefix-arg p b org-window-config-before-follow-link bibtex-mode re-search-forward "@[a-zA-Z]+[ 	\n]*{[ 	\n]*" regexp-quote "[ 	\n]*," nil t 0 (16) set-window-configuration bibtex-url recenter] 4 (#$ . 16962)])
(add-hook 'org-execute-file-search-functions 'org-execute-file-search-in-bibtex)
#@120 Export each headline in the current file to a bibtex entry.
Headlines are exported using `org-bibtex-export-headline'.
(defalias 'org-bibtex #[(&optional filename) "\301\302\215\211\205b\210\303\304\305\306 8\")\207" [error-point bib (byte-code "\304\305\306\307!\"	\310\311\312!!\313\216r\nq\210\314\315\316#c\210)r\nq\210\317\305\211\305\320%\210,\321\322G	#\210)\305\207" [bibtex-entries filename #1=#:temp-buffer #2=#:temp-file remove nil org-map-entries #[nil "\300\301\302\217\207" [foo (org-bibtex-headline) ((error (byte-code "\300\301`\"\207" [throw bib] 3)))] 3] get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) mapconcat identity "\n" write-region 0 message "Successfully exported %d BibTeX entries to %s"] 6) message "Bibtex error at %S" 4 org-heading-components] 5 (#$ . 17557) (list (read-file-name "Bibtex file: " nil nil nil (file-name-nondirectory (concat (file-name-sans-extension (buffer-file-name)) ".bib"))))])
#@112 Check the current headline for required fields.
With prefix argument OPTIONAL also prompt for optional fields.
(defalias 'org-bibtex-check #[(&optional optional) "\214\304 \210\305!\211\205\306\307	P!)\211\205\310\n\"*\207" [org-bibtex-type-property-name name type optional org-narrow-to-subtree org-bibtex-get intern ":" org-bibtex-fleshout] 4 (#$ . 18595) "P"])
#@105 Check all headlines in the current file.
With prefix argument OPTIONAL also prompt for optional fields.
(defalias 'org-bibtex-check-all #[(&optional optional) "\300\301!\207" [org-map-entries #[nil "\301!\207" [optional org-bibtex-check] 2]] 2 (#$ . 18974) nil])
#@157 Create a new entry at the given level.
With a prefix arg, query for optional fields as well.
If nonew is t, add data to the headline of the entry at point.
(defalias 'org-bibtex-create #[(&optional arg nonew) "\306\307\310\311\"\312\211	\205\313\n!%\314!\203\202 \315\316P!	?\205'\317\320\"\2044\321\322\"\210	\203>\323 \210\202N\324 \210\325\326!\211c\210\327\330
\"\210)\327\n\331!\332\312O\"\210\333\"\210\334\335\"+\207" [org-bibtex-types nonew org-bibtex-type-property-name type org-bibtex-treat-headline-as-title title org-icompleting-read "Type: " mapcar #[(type) "\301@!\302\303O\207" [type symbol-name 1 nil] 3] nil org-bibtex-get keywordp intern ":" t assoc error "Type:%s is not known" org-back-to-heading org-insert-heading org-bibtex-ask :title org-bibtex-put "TITLE" symbol-name 1 org-bibtex-fleshout mapc #[(tag) "\301\302\"\207" [tag org-toggle-tag on] 3] arg org-bibtex-tags] 8 (#$ . 19245) "P"])
#@94 Add bibliographical data to the current entry.
With a prefix arg, query for optional fields.
(defalias 'org-bibtex-create-in-current-entry #[(&optional arg) "\301\302\"\207" [arg org-bibtex-create t] 3 (#$ . 20193) "P"])
#@87 Read a bibtex entry and save to `org-bibtex-entries'.
This uses `bibtex-parse-entry'.
(defalias 'org-bibtex-read #[nil "\304\305\306\307\310\212\311 \210\312 )\"B\211+\207" [strip-delim clean-space keyword org-bibtex-entries #[(str) "\301\302\227P!\207" [str intern ":"] 3] #[(str) "\301\302\303#\207" [str replace-regexp-in-string "[[:space:]\n
]+" " "] 4] #[(str) "\303\304\211\203-	@\n\305H@U\203&\n\211GSHAU\203&\n\306\nGSO	A\211\204*\n\207" [pair --dolist-tail-- str ((34 . 34) (123 . 125) (123 . 125)) nil 0 1] 4] mapcar #[(pair) "	@!\305\n\306\"\203\307\202\305\n\310\"\203\311\202\n)\f	A!!B\207" [keyword pair field clean-space strip-delim eql :=type= :type :=key= :key] 4] bibtex-beginning-of-entry bibtex-parse-entry] 3 (#$ . 20421) nil])
#@72 Insert a heading built from the first element of `org-bibtex-entries'.
(defalias 'org-bibtex-write #[nil "G\306U\203\307\310!\210\211A@\311\312\313\314 \210\315!c\210\316\317\315!\"\210\316
\320!\227\"\210	\311\211\203\234@\321@\315\"\204\223\321@\320\"\204\223\321@\322\"\203c\316A\"\210\202\223\321@\323\"\203\212\203~\324\325\326A\327\"\"\210\202\223\316@A\"\210\202\223\316@A\"\210A\211\2048*\324\f\",\207" [org-bibtex-entries entry org-special-properties val togtag org-bibtex-type-property-name 0 error "No entries in `org-bibtex-entries'" nil #[(field) "\302	\"A\207" [field entry assoc] 3] #[(tag) "\301\302\"\207" [tag org-toggle-tag on] 3] org-insert-heading :title org-bibtex-put "TITLE" :type eql :key :keywords mapc #[(kw) "\302\303\304\302\305\306	##!\207" [togtag kw replace-regexp-in-string "[^[:alnum:]_@#%]" "" "[ 	]+" "_"] 8] split-string ", *" pair --dolist-tail-- org-bibtex-key-property org-bibtex-tags-are-keywords org-bibtex-tags] 6 (#$ . 21206) nil])
#@68 If kill ring holds a bibtex entry yank it as an Org-mode headline.
(defalias 'org-bibtex-yank #[nil "\302\303\304!r	q\210\305\216\306\307!\210\310 +\203\311 \202 \312\313!)\207" [entry #1=#:temp-buffer nil generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) yank 1 org-bibtex-read org-bibtex-write error "Yanked text does not appear to contain a BibTeX entry"] 2 (#$ . 22251) nil])
#@55 Export current headline to kill ring as bibtex entry.
(defalias 'org-bibtex-export-to-kill-ring #[nil "\301 \302!\210)\207" [result org-bibtex-headline kill-new] 2 (#$ . 22704) nil])
#@111 Search for bibliographical entries in agenda files.
This function relies `org-search-view' to locate results.
(defalias 'org-bibtex-search #[(string) "\305\306\307\310\311\312\n\206\313\f$\"*\207" [org-agenda-search-view-always-boolean org-agenda-overriding-header string org-bibtex-prefix org-bibtex-type-property-name "Bib search results:" t org-search-view nil format "%s +{:%s%s:}" ""] 7 (#$ . 22897) "sSearch string: "])
(provide 'org-bibtex)

MMCT - 2023