summaryrefslogtreecommitdiff
path: root/lisp/image.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2000-06-13 17:54:10 +0000
committerDave Love <fx@gnu.org>2000-06-13 17:54:10 +0000
commite44f49bf60e0236d9ad1a46dfaf150464ce45c1a (patch)
tree5659048480a9e68d228ccb9ca7ffafd7a1fd1595 /lisp/image.el
parent06c525584e693feb17f3b300a2529eaa3ecac16e (diff)
downloademacs-e44f49bf60e0236d9ad1a46dfaf150464ce45c1a.tar.gz
(put-image): Default STRING to a space.
Diffstat (limited to 'lisp/image.el')
-rw-r--r--lisp/image.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/image.el b/lisp/image.el
index 339e176c223..fe9dd5bfe55 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -122,7 +122,9 @@ AREA is where to display the image. AREA nil or omitted means
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))