changeset 29624:7c53a907cce4

(put-image): Default STRING to a space.
author Dave Love <fx@gnu.org>
date Tue, 13 Jun 2000 17:54:10 +0000
parents 5cc6c13b5376
children 6bea42a402ba
files lisp/image.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/image.el	Tue Jun 13 16:25:11 2000 +0000
+++ b/lisp/image.el	Tue Jun 13 17:54:10 2000 +0000
@@ -122,7 +122,9 @@
 display it in the text area, a value of `left-margin' means
 display it in the left marginal area, a value of `right-margin'
 means display it in the right marginal area."
-  (unless string (setq string "x"))
+  ;; Use a space as least likely to cause trouble when it's a hidden
+  ;; character in the buffer.
+  (unless string (setq string " "))
   (let ((buffer (current-buffer)))
     (unless (eq (car-safe image) 'image)
       (error "Not an image: %s" image))