Because read-input is a deprecated function.
(defun arxiv-add-bibtex-entry (arxiv-number bibfile)
"Add bibtex entry for ARXIV-NUMBER to BIBFILE."
(interactive
(defun arxiv-add-bibtex-entry (arxiv-number bibfile)
"Add bibtex entry for ARXIV-NUMBER to BIBFILE."
(interactive
- (list (read-input "arxiv: ")
+ (list (read-string "arxiv: ")
;; now get the bibfile to add it to
(ido-completing-read
"Bibfile: "
;; now get the bibfile to add it to
(ido-completing-read
"Bibfile: "
kill-ring starts like a DOI, then that is the intial
prompt. Otherwise, you have to type or pste in a DOI."
(interactive
kill-ring starts like a DOI, then that is the intial
prompt. Otherwise, you have to type or pste in a DOI."
(interactive
- (list (read-input "DOI: "
+ (list (read-string "DOI: "
;; now set initial input
(cond
;; If region is active and it starts like a doi we want it.
;; now set initial input
(cond
;; If region is active and it starts like a doi we want it.
(defun doi-utils-add-entry-from-crossref-query (query bibtex-file)
"Search Crossref with QUERY and use helm to select an entry to add to BIBTEX-FILE."
(interactive (list
(defun doi-utils-add-entry-from-crossref-query (query bibtex-file)
"Search Crossref with QUERY and use helm to select an entry to add to BIBTEX-FILE."
(interactive (list
"Query: "
;; now set initial input
(cond
"Query: "
;; now set initial input
(cond
entry with the generated key already exists in the file."
(interactive
(list
entry with the generated key already exists in the file."
(interactive
(list
"ISBN: "
;; now set initial input
(cond
"ISBN: "
;; now set initial input
(cond
(goto-char (point-min))
(when (search-forward new-key nil t)
(beep)
(goto-char (point-min))
(when (search-forward new-key nil t)
(beep)
- (setq new-key (read-input
+ (setq new-key (read-string
(format "%s already exists. Enter new key (C-g to cancel): " new-key)
new-key)))
(goto-char (point-max))
(format "%s already exists. Enter new key (C-g to cancel): " new-key)
new-key)))
(goto-char (point-max))
("K" (lambda ()
(interactive)
(org-ref-set-bibtex-keywords
("K" (lambda ()
(interactive)
(org-ref-set-bibtex-keywords
- (read-input "Keywords: "
- (bibtex-autokey-get-field "keywords"))
+ (read-string "Keywords: "
+ (bibtex-autokey-get-field "keywords"))
t)))
("b" org-ref-open-in-browser)
("r" (lambda () (interactive)
t)))
("b" org-ref-open-in-browser)
("r" (lambda () (interactive)
User is prompted for tags. This function is called from `helm-bibtex'.
Argument CANDIDATES helm candidates."
(message "")
User is prompted for tags. This function is called from `helm-bibtex'.
Argument CANDIDATES helm candidates."
(message "")
- (let ((keywords (read-input "Keywords (comma separated): ")))
+ (let ((keywords (read-string "Keywords (comma separated): ")))
(loop for key in (helm-marked-candidates)
do
(save-window-excursion
(loop for key in (helm-marked-candidates)
do
(save-window-excursion