From 28c53855316133fcf7ba326412c059ba4be40d73 Mon Sep 17 00:00:00 2001
From: Moonchild <elronnd@elronnd.net>
Date: Sun, 4 Oct 2020 17:11:00 -0700
Subject: [PATCH] use uiop to (portably) get argv instead of something
 sbcl-specific

---
 src/fb-entry.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fb-entry.lisp b/src/fb-entry.lisp
index 8ef0a17..e4ba907 100644
--- a/src/fb-entry.lisp
+++ b/src/fb-entry.lisp
@@ -29,7 +29,7 @@
                 (if target
                   (build target)
                   (format t "No target named '~a'.~%" target-name))))
-          (or (cdr sb-ext:*posix-argv*) '("default")))
+          (or (uiop:command-line-arguments) '("default")))
 
   (with-open-file (fp "fancy.buildcache"
                       :direction :output