.emacs-my
changeset 619 d5b22e5edae1
parent 618 568cb811ee5b
child 620 bf8dd15f71a3
--- a/.emacs-my	Sat Mar 26 17:57:25 2011 +0200
+++ b/.emacs-my	Sat Mar 26 18:50:22 2011 +0200
@@ -642,10 +642,19 @@
 (add-to-list 'auto-mode-alist '("\\.\\(war\\|ear\\|sar\\|egg\\)\\'" . archive-mode))
 
 ;;; ----------------------------------------------------------------
-(message "image")
+(message "image, png, svg")
 
 (when (fboundp 'auto-image-file-mode)
   (auto-image-file-mode 1))
+(eval-after-load 'image-file
+  '(progn
+     ;; Exclude .svg image from supported image list, as Emacs doesn't come
+     ;; with SVG shared library.
+     (setq image-file-name-extensions (remove "svg" image-file-name-extensions))
+     (when auto-image-file-mode
+       ;; Re-initialize the image-file handler.
+       (auto-image-file-mode t))
+     ))
 
 ;;; ----------------------------------------------------------------
 (message "revert buffer")