aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ezimage.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/ezimage.el b/lisp/ezimage.el
index a00703d5471..a689adc25cd 100644
--- a/lisp/ezimage.el
+++ b/lisp/ezimage.el
@@ -78,7 +78,7 @@ IMAGESPEC is the image data, and DOCSTRING is documentation for the image."
78 78
79 ) 79 )
80 (if (not (fboundp 'make-glyph)) 80 (if (not (fboundp 'make-glyph))
81 81
82(defmacro defezimage (variable imagespec docstring) 82(defmacro defezimage (variable imagespec docstring)
83 "Don't bother loading up an image... 83 "Don't bother loading up an image...
84Argument VARIABLE is the variable to define. 84Argument VARIABLE is the variable to define.
@@ -194,7 +194,7 @@ IMAGESPEC is the image data, and DOCSTRING is documentation for the image."
194 194
195(defezimage ezimage-mail 195(defezimage ezimage-mail
196 ((:type xpm :file "ezimage/mail.xpm" :ascent center)) 196 ((:type xpm :file "ezimage/mail.xpm" :ascent center))
197 "Image if an envelope.") 197 "Image of an envelope.")
198 198
199(defezimage ezimage-checkout 199(defezimage ezimage-checkout
200 ((:type xpm :file "ezimage/checkmark.xpm" :ascent center)) 200 ((:type xpm :file "ezimage/checkmark.xpm" :ascent center))
@@ -206,7 +206,7 @@ IMAGESPEC is the image data, and DOCSTRING is documentation for the image."
206 206
207(defezimage ezimage-object-out-of-date 207(defezimage ezimage-object-out-of-date
208 ((:type xpm :file "ezimage/bitsbang.xpm" :ascent center)) 208 ((:type xpm :file "ezimage/bitsbang.xpm" :ascent center))
209 "Image representing bits with a ! in it. (an out of data object file.)") 209 "Image representing bits with a ! in it. (An out of data object file.)")
210 210
211(defezimage ezimage-label 211(defezimage ezimage-label
212 ((:type xpm :file "ezimage/label.xpm" :ascent center)) 212 ((:type xpm :file "ezimage/label.xpm" :ascent center))
@@ -264,7 +264,7 @@ IMAGESPEC is the image data, and DOCSTRING is documentation for the image."
264 "Insert an image button based on text starting at START for LENGTH chars. 264 "Insert an image button based on text starting at START for LENGTH chars.
265If buttontext is unknown, just insert that text. 265If buttontext is unknown, just insert that text.
266If we have an image associated with it, use that image. 266If we have an image associated with it, use that image.
267Optional argument STRING is a st ring upon which to add text properties." 267Optional argument STRING is a string upon which to add text properties."
268 (when ezimage-use-images 268 (when ezimage-use-images
269 (let* ((bt (buffer-substring start (+ length start))) 269 (let* ((bt (buffer-substring start (+ length start)))
270 (a (assoc bt ezimage-expand-image-button-alist))) 270 (a (assoc bt ezimage-expand-image-button-alist)))
@@ -293,7 +293,7 @@ Return STRING with properties applied."
293 293
294(defun ezimage-insert-over-text (image start end &optional string) 294(defun ezimage-insert-over-text (image start end &optional string)
295 "Place IMAGE over the text between START and END. 295 "Place IMAGE over the text between START and END.
296Assumes the image is part of a gui and can be clicked on. 296Assumes the image is part of a GUI and can be clicked on.
297Optional argument STRING is a string upon which to add text properties." 297Optional argument STRING is a string upon which to add text properties."
298 (when ezimage-use-images 298 (when ezimage-use-images
299 (if (featurep 'xemacs) 299 (if (featurep 'xemacs)