X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/4aea4c6051739307ccbe0e2d87726ba39cb21dbb..74ca1bf50dae2ae7dfa61352d77a5edba9cc3db6:/src/utilities.lisp

diff --git a/src/utilities.lisp b/src/utilities.lisp
index 0f6a54b..1e10c24 100644
--- a/src/utilities.lisp
+++ b/src/utilities.lisp
@@ -82,7 +82,7 @@   (defun strip-quote (form)
 	   form))))
 
 (export 'once-only)
-(defmacro once-only (binds &body body)
+(defmacro once-only ((&rest binds) &body body)
   "Macro helper for preventing repeated evaluation.
 
    The syntax is actually hairier than shown: