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
89a92f42
Commit
89a92f42
authored
Dec 03, 2010
by
Katsumi Yamaoka
Browse files
gnus-util.el (gnus-macroexpand-all): Fix last change.
parent
9778055f
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
2 deletions
+3
-2
lisp/gnus/gnus-util.el
lisp/gnus/gnus-util.el
+3
-2
No files found.
lisp/gnus/gnus-util.el
View file @
89a92f42
...
...
@@ -2046,11 +2046,12 @@ definitions to shadow the loaded ones for use in file byte-compilation."
(
len
(
length
(
setq
form
(
copy-sequence
form
))))
expanded
)
(
while
(
<
idx
len
)
(
setcar
(
nthcdr
idx
form
)
(
gnus-macroexpand-all
(
nth
idx
form
)))
(
setcar
(
nthcdr
idx
form
)
(
gnus-macroexpand-all
(
nth
idx
form
)
environment
))
(
setq
idx
(
1+
idx
)))
(
if
(
eq
(
setq
expanded
(
macroexpand
form
environment
))
form
)
form
(
gnus-macroexpand-all
expanded
)))
(
gnus-macroexpand-all
expanded
environment
)))
form
)))
(
provide
'gnus-util
)
...
...
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