]> git.donarmstrong.com Git - org-ref.git/blobdiff - isbn.el
Use `org-ref-reftex-format-citation` for `org-ref-open-bibtex-notes`
[org-ref.git] / isbn.el
diff --git a/isbn.el b/isbn.el
index b70ced252602af2d6e5a22a39da902f6c18d2a80..a759bc072b394688fd04758c2ed1d536e6c97fd0 100644 (file)
--- a/isbn.el
+++ b/isbn.el
@@ -46,7 +46,7 @@ file."
 entry with the generated key already exists in the file."
   (interactive
    (list
-    (read-input
+    (read-string
      "ISBN: "
      ;; now set initial input
      (cond
@@ -88,9 +88,9 @@ entry with the generated key already exists in the file."
          (concat "\n@book{,\n"
                  (mapconcat
                   'identity
-                  (loop for field in (-sort 'string-lessp (mapcar 'car metadata))
-                        collect
-                        (format "  %s={%s}," field (cdr (assoc field metadata))))
+                  (cl-loop for field in (-sort 'string-lessp (mapcar 'car metadata))
+                           collect
+                           (format "  %s={%s}," field (cdr (assoc field metadata))))
                   "\n")
                  "\n}\n"))
 
@@ -104,7 +104,7 @@ entry with the generated key already exists in the file."
     (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))