From 66deaba20fc4a94148e0e5d8a0a83e76feeb36ae Mon Sep 17 00:00:00 2001
From: Attila Lendvai <attila.lendvai@gmail.com>
Date: Sat, 9 Jan 2010 22:15:09 +0200
Subject: [PATCH] add &rest args to UNIONF and NUNIONF to support the keyword
 args of UNION and NUNION (suggested by Andrew Philpot)

---
 lists.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lists.lisp b/lists.lisp
index d7a437e..19721a0 100644
--- a/lists.lisp
+++ b/lists.lisp
@@ -103,11 +103,11 @@ argument.")
   "Modify-macro for NCONC. Concatenates LISTS to place designated by the first
 argument.")
 
-(define-modify-macro unionf (list) union
+(define-modify-macro unionf (list &rest args) union
   "Modify-macro for UNION. Saves the union of LIST and the contents of the
 place designated by the first argument to the designated place.")
 
-(define-modify-macro nunionf (list) nunion
+(define-modify-macro nunionf (list &rest args) nunion
   "Modify-macro for NUNION. Saves the union of LIST and the contents of the
 place designated by the first argument to the designated place. May modify
 either argument.")
-- 
GitLab