Mercurial > emacs
comparison lisp/image-mode.el @ 75626:85c419892123
Use autoload to avoid overriding disabled setting applied in .emacs.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sat, 03 Feb 2007 01:01:01 +0000 |
| parents | 146ba0f8974c |
| children | 19d4ee6e5621 |
comparison
equal
deleted
inserted
replaced
| 75625:b338973597bf | 75626:85c419892123 |
|---|---|
| 172 ;; area look correct when the image is wider than the window. | 172 ;; area look correct when the image is wider than the window. |
| 173 (setq truncate-lines t) | 173 (setq truncate-lines t) |
| 174 (if (called-interactively-p) | 174 (if (called-interactively-p) |
| 175 (message "Repeat this command to go back to displaying the file as text"))))) | 175 (message "Repeat this command to go back to displaying the file as text"))))) |
| 176 | 176 |
| 177 (put 'image-toggle-display 'disabled "\ | 177 ;; Don't override the setting from .emacs. |
| 178 WARNING: Displaying images can be a security risk. | 178 ;;;###autoload (put 'image-toggle-display 'disabled t) |
| 179 Please make sure you're using up-to-date image libraries | 179 |
| 180 and the images displayed come from a trusted source.") | 180 (if (get 'image-toggle-display 'disabled) |
| 181 (put 'image-toggle-display 'disabled "\ | |
| 182 | |
| 183 Warning: Displaying images in Emacs could be a security risk. | |
| 184 Please ensure that you are using up-to-date image libraries | |
| 185 and that the images being displayed come from a trusted source.")) | |
| 181 | 186 |
| 182 (provide 'image-mode) | 187 (provide 'image-mode) |
| 183 | 188 |
| 184 ;; arch-tag: b5b2b7e6-26a7-4b79-96e3-1546b5c4c6cb | 189 ;; arch-tag: b5b2b7e6-26a7-4b79-96e3-1546b5c4c6cb |
| 185 ;;; image-mode.el ends here | 190 ;;; image-mode.el ends here |