X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=isbn.el;h=cb73f6852f5ed5c861666e4a82c58e3104169a57;hp=b70ced252602af2d6e5a22a39da902f6c18d2a80;hb=669d2f3e9a8a033213dfefe40b380ab268962504;hpb=a5df44410adb84103c2e44c74ba6d0c4ce0fe9b3

diff --git a/isbn.el b/isbn.el
index b70ced2..cb73f68 100644
--- 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
@@ -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))