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
9bb7a286
Commit
9bb7a286
authored
Aug 18, 2000
by
Dave Love
Browse files
(find-image): Copy `spec' before using plist-put.
parent
13004bef
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
1 deletion
+6
-1
lisp/ChangeLog
lisp/ChangeLog
+4
-0
lisp/image.el
lisp/image.el
+2
-1
No files found.
lisp/ChangeLog
View file @
9bb7a286
2000-08-18 Dave Love <fx@gnu.org>
* image.el (find-image): Copy `spec' before using plist-put.
2000-08-18 Gerd Moellmann <gerd@gnu.org>
* textmodes/ispell.el (ispell-dictionary-alist-6): Add
...
...
lisp/image.el
View file @
9bb7a286
...
...
@@ -225,7 +225,8 @@ The image is looked for first on `load-path' and then in `data-directory'."
(
setq
found
try-file
))))
(
if
found
(
setq
image
(
cons
'image
(
plist-put
spec
:file
found
))))))
(
cons
'image
(
plist-put
(
copy-sequence
spec
)
:file
found
))))))
((
not
(
null
data
))
(
setq
image
(
cons
'image
spec
)))))
(
setq
specs
(
cdr
specs
))))
...
...
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