Lines Matching +refs:use +refs:completion +refs:before +refs:point
85 If this is a string, use it as the initial field text.
146 Functions are called with point inside the cleaned entry, and the buffer
204 "Max length of `bibtex-field-kill-ring' before discarding oldest elements."
209 "Max length of `bibtex-entry-kill-ring' before discarding oldest elements."
220 "If non-nil, use fast but simplified algorithm for parsing BibTeX keys.
229 ("journal" "Name of the journal (use string, remove braces)")
239 ("journal" "Name of the journal (use string, remove braces)")
288 ("type" "Word to use instead of \"chapter\"")
304 ("type" "Word to use instead of \"chapter\"")
319 ("type" "Word to use instead of \"chapter\"")
336 ("type" "Word to use instead of \"chapter\"")
578 "Number of names to use for the automatically generated reference key.
677 (defcustom bibtex-autokey-use-crossref t
678 "If non-nil use fields from crossreferenced entry if necessary.
686 "Number of title words to use for the automatically generated reference key.
776 (defcustom bibtex-autokey-edit-before-use t
777 "If non-nil, user is allowed to edit the generated key before it is used."
781 (defcustom bibtex-autokey-before-presentation-function nil
782 "If non-nil, function to call before generated key is presented.
784 and must return a string (the key to use)."
1076 (defvar bibtex-pop-previous-search-point nil
1077 "Next point where `bibtex-pop-previous' starts looking for a similar entry.")
1079 (defvar bibtex-pop-next-search-point nil
1080 "Next point where `bibtex-pop-next' starts looking for a similar entry.")
1100 (lazy-completion-table bibtex-strings
1109 (lazy-completion-table bibtex-reference-keys
1260 return a cons pair of these values. Do not move point."
1275 part and end position of the match. Move point to end of field name.
1289 (error "Comma missing at buffer position %s" (point)))
1319 Do not move point."
1320 (let ((end-point
1325 (point)))
1330 (point))))))
1331 (if end-point
1332 (cons (point) end-point))))
1339 returned, nil otherwise. Move point to end of field text."
1340 (let ((starting-point (point))
1341 end-point failure boundaries)
1342 (while (not (or end-point failure))
1350 (setq end-point (point))))
1353 end-point)
1354 (list starting-point end-point (point)))))
1357 "Parse the BibTeX field beginning at the position of point.
1359 the boundaries of the name and text parts of the field. Do not move point."
1381 by the end of the current entry. Do not move point."
1422 limited by the beginning of the current entry. Do not move point."
1467 (while (< (setq opoint (point)) epoint)
1489 (beg (bibtex-beginning-of-entry)) ; move point
1510 (let ((start (point)))
1520 (list start (point) (point))))))))
1526 character of the string entry. Move point past BibTeX string entry."
1538 "Parse a BibTeX string entry beginning at the position of point.
1541 If EMPTY-KEY is non-nil, key may be empty. Do not move point."
1550 If EMPTY-KEY is non-nil, key may be empty. Do not move point."
1592 Point must be at beginning of preamble. Do not move point."
1607 "Delete all whitespace starting at point."
1609 (delete-region (point) (match-end 0))))
1612 "Compute line number of point regardless whether the buffer is narrowed."
1613 (+ (count-lines 1 (point))
1621 if a valid entry is found, nil otherwise. Do not move point.
1646 "Move point to beginning of the next valid BibTeX entry.
1673 positions of beginning and end of entry. Also, point is at beginning of
1680 (goto-char (point-min))
1691 If FLAG is nil, a message is echoed if point was incremented at least
1701 (let* ((size (- (point-max) (point-min)))
1704 (/ (* 100 (- (point) (point-min))) size))))
1735 "Flash at BibTeX entry head before point, if exists."
1737 (pnt (point)))
1741 (< (point) pnt))
1743 (if (pos-visible-in-window-p (point))
1746 (point) (match-end bibtex-key-in-head))))))))
1755 "Make sure point is outside of a BibTeX entry."
1756 (let ((orig-point (point)))
1758 (when (< (point) orig-point)
1760 ;; Leave point at the beginning of a line, and preferably
1762 (goto-char orig-point)
1764 (unless (= ?\n (char-before (1- (point))))
1772 are ignored. Return point"
1773 (goto-char (point-min))
1775 (point))
1778 "Search for BibTeX field enclosing point.
1783 On success return bounds, nil otherwise. Do not move point."
1792 (<= (bibtex-start-of-field bounds) (point))
1793 (>= (bibtex-end-of-field bounds) (point)))
1799 "Move point to beginning of first field.
1816 (set-mark (point))
1822 (set-mark (point))
1844 (goto-char (point-min))
1868 (goto-char (point-min))
1895 (bibtex-beginning-first-field (point-min))
1965 ;; use book title of crossref'd entry
2011 ;; update point
2082 (content (bibtex-text-in-field field bibtex-autokey-use-crossref))
2123 ;; --> Take the first capital part before the comma
2160 ;; specific words and use only a specific amount of words.
2217 use all names.
2234 `bibtex-autokey-use-crossref' is non-nil, use the field of the
2240 2. Truncate the title before the first match of
2245 `bibtex-autokey-titlewords-stretch' words, use all words from the
2248 use the corresponding abbreviation (see documentation of this variable
2264 2. If `bibtex-autokey-before-presentation-function' is non-nil, it must be
2268 3. If `bibtex-autokey-edit-before-use' is non-nil, present the key in the
2284 (if bibtex-autokey-before-presentation-function
2285 (funcall bibtex-autokey-before-presentation-function autokey)
2301 If optional arg GLOBAL is non-nil, completion is based on the keys in
2303 (let (completion-ignore-case)
2310 (let ((completion-ignore-case t))
2319 If `bibtex-parse-keys-fast' is non-nil, use fast but simplified algorithm
2328 (goto-char (point-min))
2385 (goto-char (point-min))
2442 (goto-char (point-min))
2525 "Complete word fragment before point to longest prefix of COMPLETIONS.
2526 COMPLETIONS is an alist of strings. If point is not after the part
2527 of a word, all strings are listed. Return completion."
2533 (point)))
2534 (end (point))
2536 (completion (try-completion part-of-word completions)))
2537 (cond ((not completion)
2538 (error "Can't find completion for `%s'" part-of-word))
2539 ((eq completion t)
2541 ((not (string= part-of-word completion))
2543 (insert completion)
2544 completion)
2546 (message "Making completion list...")
2548 (display-completion-list (all-completions part-of-word completions)
2550 (message "Making completion list...done")
2557 ;; point is at position inside field where completion was requested
2565 "Display summary message on entry KEY after completion of a crossref key.
2629 bibtex-pop-previous-search-point
2630 bibtex-pop-next-search-point)))
2660 (setq bibtex-pop-previous-search-point (marker-position nbeg)
2661 bibtex-pop-next-search-point (marker-position nend))))))
2666 "Move point backward to beginning of field.
2668 begins at the beginning of a line. We use this function for font-locking."
2677 (pnt (point))
2681 (<= (point) bound)
2688 (if (memq (char-before end) '(?\} ?\"))
2708 (pnt (point))
2780 \\[bibtex-find-text] moves point to the end of the current field.
2781 \\[bibtex-complete] completes word fragment before point according to context.
2801 (use-local-map bibtex-mode-map)
2841 (make-local-variable 'choose-completion-string-functions)
2882 (let ((completion-ignore-case t))
2908 In the BibTeX entry at point, make new fields for those items that may occur
2915 (let ((completion-ignore-case t))
2947 "Parse entry at point, return an alist.
2951 Move point to the end of the last field.
2985 ;; First see whether to use the previous or the next entry
2995 other (point))))
3005 (< (length (try-completion "" (list key other-key)))
3006 (length (try-completion "" (list key tmp))))))
3008 other (point))))
3012 (setq key-end (point)) ;In case parse-entry changed the buffer.
3020 (delete-region (point) (bibtex-end-of-text-in-field bounds))
3024 (let* ((prefix (try-completion "" (list key other-key)))
3062 If MOVE is non-nil, move point past the present field before making
3063 the new field. If INTERACTIVE is non-nil, move point to the end of
3064 the new field. Otherwise move point past the new field.
3068 (list (let ((completion-ignore-case t)
3111 beginning of the previous entry. If point is ahead of all BibTeX entries
3112 move point to the beginning of buffer. Return the new location of point."
3118 (point))
3124 Return the new location of point."
3127 (pnt (point))
3139 (point)))
3144 (goto-char (point-min))
3154 (let ((pnt (point))
3172 "Put mark at beginning, point at end of current BibTeX entry."
3218 "Return index of BibTeX entry head at or past position of point.
3221 of `bibtex-maintain-sorted-entries' is `crossref'. Move point to the end
3252 If its value is nil use plain sorting."
3281 If its value is nil use plain sorting. Text outside of BibTeX entries is not
3295 "Move point to the beginning of BibTeX entry CROSSREF-KEY.
3299 If CROSSREF-KEY is in the same buffer like current entry but before it
3301 entry. It defaults to position of point. If optional arg SPLIT is non-nil,
3314 (point) t)))
3323 (unless pnt (setq pnt (point)))
3341 "Move point to the beginning of BibTeX entry named KEY.
3348 Otherwise, use `set-buffer'. DISPLAY is t when called interactively."
3358 ;; `bibtex-find-entry' moves point if key found
3371 (goto-char (or start (point-min)))
3388 Move point where the entry KEY should be placed.
3403 ;; then point will be at beginning of entry named key.
3408 (bounds (save-excursion (goto-char (point-max))
3410 (right (if bounds (cdr bounds) (point-min)))
3427 (setq new (point))
3460 (goto-char (point-min))
3584 (delete-region (point-min) (point-max))
3612 (goto-char (point-min))
3645 (delete-region (point-min) (point-max))
3657 "Move point to end of text of next BibTeX field or entry head.
3658 With prefix BEGIN non-nil, move point to its beginning. Optional arg COMMA
3678 "Move point to end of text of current BibTeX field or entry head.
3679 With optional prefix BEGIN non-nil, move point to its beginning.
3680 Unless NOERROR is non-nil, an error is signaled if point is not
3710 (let ((pnt (point))
3741 (if (<= pnt (point))
3835 "Copy the BibTeX field at point to the kill ring.
3853 (point))))
3897 (delete-region (point) (mark t))
3907 (delete-region (point) (bibtex-end-of-text-in-field bounds))
3958 (if (or bibtex-autokey-edit-before-use (string= "" key))
3961 (bibtex-read-key "Key to use: " key))))
3977 (point)))
3981 (bibtex-entry-index))) ; moves point to end of head
3990 start (point)) ; update start
3993 (setq error (or (/= (point) start)
4033 If optional arg MOVE is non-nil move point to end of field."
4058 default-justification nil (point))
4066 (let ((pnt (copy-marker (point)))
4078 (let ((pnt (copy-marker (point)))
4080 (beg (bibtex-beginning-of-entry)) ; move point
4098 (goto-char (point-min))
4123 (let* ((pnt (point))
4124 (use-previous-options
4130 (if use-previous-options
4154 (if use-previous-options
4159 bibtex-autokey-edit-before-use)
4196 (goto-char (point-max))
4200 "Complete word fragment before point according to context.
4201 If point is inside key or crossref field perform key completion based on
4202 `bibtex-reference-keys'. Inside a month field perform key completion
4204 \(including a String or Preamble definition) perform string completion
4206 An error is signaled if point is outside key or BibTeX field."
4208 (let ((pnt (point))
4217 ;; point is in crossref field
4220 ;; point is in month field
4222 ;; point is in other field
4226 ;; point is inside a @String key
4230 ;; point is inside a @String field
4234 ;; point is inside a @Preamble field
4240 ;; point is inside a key
4244 ;; or point is on empty key
4250 ;; key completion: no cleanup needed
4251 (setq choose-completion-string-functions nil)
4252 (let (completion-ignore-case)
4256 ;; crossref key completion
4259 ;; a completion, `choose-completion-string-functions' is still
4260 ;; non-nil. Therefore, `choose-completion-string-functions' is
4261 ;; always set (either to non-nil or nil) when a new completion
4263 (let (completion-ignore-case)
4264 (setq choose-completion-string-functions
4266 (setq choose-completion-string-functions nil)
4267 (choose-completion-string choice buffer base-size)
4269 t)) ; needed by choose-completion-string-functions
4274 ;; string key completion: no cleanup needed
4275 (setq choose-completion-string-functions nil)
4276 (let ((completion-ignore-case t))
4280 ;; string completion
4281 (let ((completion-ignore-case t))
4282 (setq choose-completion-string-functions
4284 (setq choose-completion-string-functions nil)
4285 (choose-completion-string choice buffer base-size)
4287 t)) ; needed by choose-completion-string-functions
4291 (t (setq choose-completion-string-functions nil)
4374 (setq endpos (point)))
4378 (setq endpos (point)))
4392 (let ((endpos (point)))
4399 "Browse a URL for the BibTeX entry at point.
4434 ;; we should never reach this point