Simplify pinning

Author: yitzchak

koga

@@ -64,6 +64,7 @@
   (list :extensions #'split-keywords
         :skip-sync #'split-keywords
         :jobs #'parse-integer
+        :pin #'parse-integer
         :build-mode #'parse-keyword
         :build-path #'parse-namestring))
 
@@ -140,6 +141,5 @@
                             (cond (help "HELP")
                                   ((getf initargs :archive) "ARCHIVE")
                                   ((getf initargs :pin) "PIN")
-                                  ((getf initargs :unpin) "UNPIN")
                                   (t "SETUP"))
                             initargs))