From 88d145b75977b9e014c1d72e525ec4f59fce89ff Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Sun, 9 Dec 2012 19:30:00 -0500
Subject: [PATCH] Update inferior-shell for optima change of typep -> type.
 Also fix defsystem.

---
 inferior-shell.asd | 4 ++--
 process-spec.lisp  | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/inferior-shell.asd b/inferior-shell.asd
index fca23d8..b7f9e10 100644
--- a/inferior-shell.asd
+++ b/inferior-shell.asd
@@ -2,8 +2,8 @@
 
 (defsystem :inferior-shell
   :defsystem-depends-on (:asdf-condition-control)
-  :depends-on (:asdf :xcvb-utils :fare-quasiquote-extras :fare-mop :alexandria
-                     #+sbcl :sb-posix)
+  :depends-on (:asdf :xcvb-utils :fare-quasiquote-extras :fare-mop
+               #+sbcl :sb-posix)
   :description "spawn local or remote processes and shell pipes"
   :components
   ((:file "pkgdcl")
diff --git a/process-spec.lisp b/process-spec.lisp
index ff52ea0..b6fd176 100644
--- a/process-spec.lisp
+++ b/process-spec.lisp
@@ -317,7 +317,7 @@
            (`(quote ,@args) ;; quote
              (e (xcvb-driver:escape-command
                  (parse-command-spec-tokens args))))
-           (`(,(typep simple-command-line-token) ,@_) ;; recurse
+           (`(,(type simple-command-line-token) ,@_) ;; recurse
              (map () #'p x))
            (_
             (error "Unrecognized command-spec token ~S" x)))))
-- 
GitLab