diff --git a/ChangeLog b/ChangeLog
index dfd7b50d2803dc1763b5c71ab9b97d111645d70c_Q2hhbmdlTG9n..73c3cc4413dade4e35a4f2f34f396cb8fa16b82c_Q2hhbmdlTG9n 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+1998-07-03  Charles G Waldman  <cgw@pgt.com>
+
+	* image-mode.el: Fixed image-decode to handle start and end args.
+
 1998-03-25  SL Baur  <steve@altair.xemacs.org>
 
 	* folding.el: New file.
diff --git a/Makefile b/Makefile
index dfd7b50d2803dc1763b5c71ab9b97d111645d70c_TWFrZWZpbGU=..73c3cc4413dade4e35a4f2f34f396cb8fa16b82c_TWFrZWZpbGU= 100644
--- a/Makefile
+++ b/Makefile
@@ -19,7 +19,7 @@
 
 # This XEmacs package contains independent single file lisp packages
 
-VERSION = 1.07
+VERSION = 1.08
 AUTHOR_VERSION =
 MAINTAINER = XEmacs Development Team <xemacs-beta@xemacs.org>
 PACKAGE = text-modes
diff --git a/image-mode.el b/image-mode.el
index dfd7b50d2803dc1763b5c71ab9b97d111645d70c_aW1hZ2UtbW9kZS5lbA==..73c3cc4413dade4e35a4f2f34f396cb8fa16b82c_aW1hZ2UtbW9kZS5lbA== 100644
--- a/image-mode.el
+++ b/image-mode.el
@@ -33,7 +33,7 @@
   "Decode the image between START and END which is encoded in TYPE."
   (save-excursion
     (let ((image (make-image-instance
-		  (vector type :data (buffer-string)) nil nil 'no-error)))
+		  (vector type :data (buffer-string start end)) nil nil 'no-error)))
       (delete-region start end)
       (if image
 	  (let ((glyph (make-glyph image)))