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
cd110b2b
Commit
cd110b2b
authored
Sep 01, 2010
by
Katsumi Yamaoka
Browse files
gnus-html-curl-sentinel: Replace process-get with gnus-process-get.
parent
a14b3417
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
5 additions
and
2 deletions
+5
-2
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+3
-0
lisp/gnus/gnus-html.el
lisp/gnus/gnus-html.el
+2
-2
No files found.
lisp/gnus/ChangeLog
View file @
cd110b2b
...
...
@@ -3,6 +3,9 @@
* gnus-ems.el (gnus-process-get, gnus-process-put): New compatibility
functions.
* gnus-html.el (gnus-html-curl-sentinel): Replace process-get with
gnus-process-get.
2010-08-31 Julien Danjou <julien@danjou.info> (tiny change)
* nnimap.el (nnimap-request-newgroups): Use nnimap-request-list-method
...
...
lisp/gnus/gnus-html.el
View file @
cd110b2b
...
...
@@ -171,8 +171,8 @@
(
defun
gnus-html-curl-sentinel
(
process
event
)
(
when
(
string-match
"finished"
event
)
(
let*
((
images
(
process-get
process
'images
))
(
buffer
(
process-get
process
'buffer
))
(
let*
((
images
(
gnus-
process-get
process
'images
))
(
buffer
(
gnus-
process-get
process
'buffer
))
(
spec
(
pop
images
))
(
file
(
gnus-html-image-id
(
car
spec
))))
(
when
(
and
(
buffer-live-p
buffer
)
...
...
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