X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=api.lisp;h=3281f18c322f821e680a59f2fc45830fba74917a;hb=c18c02e07944ea56688b4fc350dbdab400f84fe1;hp=c3c07214a76d298c935774c6a272389211dd8f1c;hpb=b2e27d22e4901acfffac824ea15679edf14c6ec9;p=lml.git diff --git a/api.lisp b/api.lisp index c3c0721..3281f18 100644 --- a/api.lisp +++ b/api.lisp @@ -94,6 +94,6 @@ (defmacro with-functions (&rest slots) `(progn ,@(loop for (fn description . args) in slots collect - `(with-function-info (,fn ,@(if args args - '(connection-variable))) + `(with-function-info (,fn ,@(if args args + '(connection-variable))) ,description))))