Mercurial > emacs
changeset 29626:ecb96a7369d3
Fix last change to be in insert-image as intended.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Tue, 13 Jun 2000 18:17:25 +0000 |
| parents | 6bea42a402ba |
| children | 943a97b056d2 |
| files | lisp/image.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/image.el Tue Jun 13 17:55:59 2000 +0000 +++ b/lisp/image.el Tue Jun 13 18:17:25 2000 +0000 @@ -122,9 +122,7 @@ 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 @@ 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)))