Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
3f1cd957
Commit
3f1cd957
authored
Feb 21, 2017
by
Stefan Monnier
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* lisp/emacs-lisp/cl-generic.el (cl-defgeneric): Fix last change
parent
cd191c80
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
1 addition
and
1 deletion
+1
-1
lisp/emacs-lisp/cl-generic.el
lisp/emacs-lisp/cl-generic.el
+1
-1
No files found.
lisp/emacs-lisp/cl-generic.el
View file @
3f1cd957
...
@@ -231,9 +231,9 @@ DEFAULT-BODY, if present, is used as the body of a default method.
...
@@ -231,9 +231,9 @@ DEFAULT-BODY, if present, is used as the body of a default method.
(
defalias
',name
(
defalias
',name
(
cl-generic-define
',name
',args
',
(
nreverse
options
))
(
cl-generic-define
',name
',args
',
(
nreverse
options
))
,
(
help-add-fundoc-usage
doc
args
))
,
(
help-add-fundoc-usage
doc
args
))
:autoload-end
,@
(
mapcar
(
lambda
(
method
)
`
(
cl-defmethod
,
name
,@
method
))
,@
(
mapcar
(
lambda
(
method
)
`
(
cl-defmethod
,
name
,@
method
))
(
nreverse
methods
)))
(
nreverse
methods
)))
:autoload-end
,@
(
mapcar
(
lambda
(
declaration
)
,@
(
mapcar
(
lambda
(
declaration
)
(
let
((
f
(
cdr
(
assq
(
car
declaration
)
(
let
((
f
(
cdr
(
assq
(
car
declaration
)
defun-declarations-alist
))))
defun-declarations-alist
))))
...
...
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