scratch/emoji 7437533 1/3: Barf if read only

[Lars Ingebrigtsen]

branch: scratch/emoji
commit 743753334050563944025bcde7afc2c892db70bc
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Barf if read only
---
 lisp/play/emoji.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/play/emoji.el b/lisp/play/emoji.el
index d3c74ab..6cf8a3a 100644
--- a/lisp/play/emoji.el
+++ b/lisp/play/emoji.el
@@ -46,7 +46,7 @@
   "Choose and insert an emoji glyph.
 If TEXT (interactively, the prefix), use a textual search instead
 of a visual interface."
-  (interactive "P")
+  (interactive "*P")
   (emoji--init)
   (if text
       (emoji--choose-emoji)
@@ -59,7 +59,7 @@ of a visual interface."
   "List emojis and insert the one that's selected.
 The character will be inserted into the buffer that was selected
 when the command was issued."
-  (interactive)
+  (interactive "*")
   (let ((buf (current-buffer)))
     (emoji--init)
     (pop-to-buffer (get-buffer-create "*Emoji*"))