diff options
| -rw-r--r-- | lisp/image-file.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/image-file.el b/lisp/image-file.el index 2e1ac4401dd..f8da174364b 100644 --- a/lisp/image-file.el +++ b/lisp/image-file.el | |||
| @@ -115,9 +115,10 @@ the command `insert-file-contents'." | |||
| 115 | (props | 115 | (props |
| 116 | `(display ,image | 116 | `(display ,image |
| 117 | intangible ,image | 117 | intangible ,image |
| 118 | rear-nonsticky (display intangible read-only) | 118 | rear-nonsticky (display intangible) |
| 119 | ;; This a cheap attempt to make the whole buffer | 119 | ;; This a cheap attempt to make the whole buffer |
| 120 | ;; read-only when we're visiting the file. | 120 | ;; read-only when we're visiting the file (as |
| 121 | ;; opposed to just inserting it). | ||
| 121 | ,@(and visit | 122 | ,@(and visit |
| 122 | (= ibeg (point-min)) | 123 | (= ibeg (point-min)) |
| 123 | (= iend (point-max)) | 124 | (= iend (point-max)) |