summaryrefslogtreecommitdiff
path: root/lisp/image.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2000-06-13 18:18:02 +0000
committerDave Love <fx@gnu.org>2000-06-13 18:18:02 +0000
commit0ad550ba63b104d5983c54255b37eba3906e1321 (patch)
tree16c1162855896d51c6724a15fc277128632914e2 /lisp/image.el
parentf290ca08fa36d152ee2c3bda959e4f4fdf40d8c1 (diff)
downloademacs-0ad550ba63b104d5983c54255b37eba3906e1321.tar.gz
Fix last change to be in insert-image as intended.
Diffstat (limited to 'lisp/image.el')
-rw-r--r--lisp/image.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/image.el b/lisp/image.el
index fe9dd5bfe55..0e507d2ed3c 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -122,9 +122,7 @@ 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."
- ;; Use a space as least likely to cause trouble when it's a hidden
- ;; character in the buffer.
- (unless string (setq string " "))
+ (unless string (setq string "x"))
(let ((buffer (current-buffer)))
(unless (eq (car-safe image) 'image)
(error "Not an image: %s" image))
@@ -148,7 +146,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 " "))
(unless (eq (car-safe image) 'image)
(error "Not an image: %s" image))
(unless (or (null area) (memq area '(left-margin right-margin)))