Mercurial > emacs
comparison lisp/image-mode.el @ 70943:488f02720eed
* image-mode.el (image-toggle-display): Use buffer contents to
generate image for a remote file.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Fri, 26 May 2006 03:34:33 +0000 |
| parents | 3e313b3afda5 |
| children | 3c0fceee4b4a |
comparison
equal
deleted
inserted
replaced
| 70942:8e80bce30fa0 | 70943:488f02720eed |
|---|---|
| 137 (message "Repeat this command to go back to displaying the image"))) | 137 (message "Repeat this command to go back to displaying the image"))) |
| 138 ;; Turn the image data into a real image, but only if the whole file | 138 ;; Turn the image data into a real image, but only if the whole file |
| 139 ;; was inserted | 139 ;; was inserted |
| 140 (let* ((image | 140 (let* ((image |
| 141 (if (and (buffer-file-name) | 141 (if (and (buffer-file-name) |
| 142 (not (file-remote-p (buffer-file-name))) | |
| 142 (not (buffer-modified-p)) | 143 (not (buffer-modified-p)) |
| 143 (not (and (boundp 'archive-superior-buffer) | 144 (not (and (boundp 'archive-superior-buffer) |
| 144 archive-superior-buffer)) | 145 archive-superior-buffer)) |
| 145 (not (and (boundp 'tar-superior-buffer) | 146 (not (and (boundp 'tar-superior-buffer) |
| 146 tar-superior-buffer))) | 147 tar-superior-buffer))) |