From 834b54855c58b81c4274611ac75fa154fc540fc8 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Tue, 21 Oct 2008 09:21:02 +0000 Subject: [PATCH] (Calling Functions): Use `defalias' instead of `fset'. Fix wording. --- doc/lispref/functions.texi | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/doc/lispref/functions.texi b/doc/lispref/functions.texi index e420e932fc..e64cc030d6 100644 --- a/doc/lispref/functions.texi +++ b/doc/lispref/functions.texi @@ -749,14 +749,17 @@ accepts @var{n} arguments, then a call to @code{apply-partially} with @w{@code{@var{m} < @var{n}}} arguments will produce a new function of @w{@code{@var{n} - @var{m}}} arguments. -Here's an example of using @code{apply-partially} to produce a variant -of the Emacs Lisp primitive @code{1+}, a function that increments its -argument by one, based on the primitive @code{+}: +Here's how we could define the built-in function @code{1+}, if it +didn't exist, using @code{apply-partially} and @code{+}, another +built-in function: @example -(fset 'incr-by-one (apply-partially '+ 1)) @group -(incr-by-one 10) +(defalias '1+ (apply-partially '+ 1) + "Increment argument by one.") +@end group +@group +(1+ 10) @result{} 11 @end group @end example -- 2.20.1