(create-image (sixel-to-xpm sixel-string) 'xpm t))
(insert "\n")))))
+(defgroup sixel nil
+ "Render sixel images."
+ :group 'multimedia)
+
+(define-minor-mode sixel-mode
+ "A minor mode which renders sixel graphics." nil "sixel" nil
+ (add-hook 'after-change-functions
+ (lambda (start end size)
+ (sixel-render-images-in-buffer)
+ (message "Render complete."))
+ nil t))
+
;;; sixel.el ends here