From cd62df4c63dcbd15658a91cd33295926187c6922 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Renaud=20Casenave-P=C3=A9r=C3=A9?= <renaud@casenave-pere.fr>
Date: Wed, 22 Oct 2014 10:30:28 +0900
Subject: [PATCH] make utils:group second argument optional

This function is often used to group together 2 symbols so make it the
default behavior
---
 src/utils.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/utils.lisp b/src/utils.lisp
index af8145a..7b6edb9 100644
--- a/src/utils.lisp
+++ b/src/utils.lisp
@@ -42,7 +42,7 @@
   "Return `x' if it is a list, return '(x) otherwise."
   (if (listp x) x (list x)))
 
-(defun group (source n)
+(defun group (source &optional (n 2))
   "Regroup the list `source' elements by n."
   (when (zerop n)
     (error "zero length"))