diff options
| author | Juri Linkov | 2005-03-08 21:48:50 +0000 |
|---|---|---|
| committer | Juri Linkov | 2005-03-08 21:48:50 +0000 |
| commit | 15a420bd3f415e4134d89f9c204ce4f5a18c0d3d (patch) | |
| tree | ed540e2ca5444b7c38728b1b6cbec4eae6cbb406 | |
| parent | 51d23bd053b36c85874696b7a9cfa2d40877cd30 (diff) | |
| download | emacs-15a420bd3f415e4134d89f9c204ce4f5a18c0d3d.tar.gz emacs-15a420bd3f415e4134d89f9c204ce4f5a18c0d3d.zip | |
(image-file-handler): Put `safe-magic' property to
`image-file-handler'.
| -rw-r--r-- | lisp/image-file.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/image-file.el b/lisp/image-file.el index 4a13019a090..11676021afd 100644 --- a/lisp/image-file.el +++ b/lisp/image-file.el | |||
| @@ -135,6 +135,7 @@ the command `insert-file-contents'." | |||
| 135 | (setq truncate-lines t)))) | 135 | (setq truncate-lines t)))) |
| 136 | rval)) | 136 | rval)) |
| 137 | 137 | ||
| 138 | (put 'image-file-handler 'safe-magic t) | ||
| 138 | (defun image-file-handler (operation &rest args) | 139 | (defun image-file-handler (operation &rest args) |
| 139 | "Filename handler for inserting image files. | 140 | "Filename handler for inserting image files. |
| 140 | OPERATION is the operation to perform, on ARGS. | 141 | OPERATION is the operation to perform, on ARGS. |