diff --git a/gists.org b/gists.org
index 817aab9..d03afd4 100644
--- a/gists.org
+++ b/gists.org
@@ -931,6 +931,7 @@ Which covers my (potential) GPG/SSH usage within Emacs. Now, anytime a I perform
     (with-current-buffer (get-buffer-create "*qr*")
       ;; in case the buffer still exists and image-mode is active
       (fundamental-mode)
+      (read-only-mode -1)
       (erase-buffer)
       (insert text)
       (let ((file-format
@@ -938,6 +939,7 @@ Which covers my (potential) GPG/SSH usage within Emacs. Now, anytime a I perform
         (call-process-region nil nil "qrencode" t t nil "-o" "-" "-t" file-format)
         (when (and (display-graphic-p) (string= file-format "PNG"))
           (image-mode)))
+      (read-only-mode)
       (display-buffer (current-buffer))))
 #+end_src
 
diff --git a/gists/generate-qr.el b/gists/generate-qr.el
index eda0a16..81ecb42 100644
--- a/gists/generate-qr.el
+++ b/gists/generate-qr.el
@@ -17,6 +17,7 @@ This function relies on qrencode(1) being present in your $PATH."
   (with-current-buffer (get-buffer-create "*qr*")
     ;; in case the buffer still exists and image-mode is active
     (fundamental-mode)
+    (read-only-mode -1)
     (erase-buffer)
     (insert text)
     (let ((file-format
@@ -24,4 +25,5 @@ This function relies on qrencode(1) being present in your $PATH."
       (call-process-region nil nil "qrencode" t t nil "-o" "-" "-t" file-format)
       (when (and (display-graphic-p) (string= file-format "PNG"))
         (image-mode)))
+    (read-only-mode)
     (display-buffer (current-buffer))))