r11859: Canonicalize whitespace

[lml.git] / api.lisp

diff --git a/api.lisp b/api.lisp
index c3c07214a76d298c935774c6a272389211dd8f1c..3281f18c322f821e680a59f2fc45830fba74917a 100644 (file)
--- 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))))