Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
f290ca08
Commit
f290ca08
authored
Jun 13, 2000
by
Dave Love
Browse files
(put-image): Default STRING to a space.
parent
97aa9c1d
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
5 additions
and
1 deletion
+5
-1
lisp/ChangeLog
lisp/ChangeLog
+2
-0
lisp/image.el
lisp/image.el
+3
-1
No files found.
lisp/ChangeLog
View file @
f290ca08
2000-06-13 Dave Love <fx@gnu.org>
* image.el (put-image): Default STRING to a space.
* info.el Doc fixes.
(Info-build-node-completions): Match Ref tags.
...
...
lisp/image.el
View file @
f290ca08
...
...
@@ -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
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment