update to use clpm

1 files changed, 0 insertions, 10 deletions

diff --git a/run.lisp b/run.lisp
index 8eeb603..f83351b 100644
--- a/run.lisp
+++ b/run.lisp
@@ -11,16 +11,6 @@
   (format t "       TARGET-DIR a directory where the tilesheet is to be built.~%")
   (format t "       SHEET-TITLE a name used for this sheet and its meta info~%~%"))
 
-#+ecl
-(defun main ()
-  (print (ext:command-args)))
-  ;; (unless (= 4 (length (ext:command-args)))
-  ;;   (print-help)
-  ;;   (ext:quit))
-  ;; (destructuring-bind (src target title) (cdr (ext:command-args))
-  ;;   (imbricate:imbricate-and-save src target title)
-  ;;   (ext:quit)))
-
 #+sbcl
 (defun main ()
   (unless (= 4 (length sb-ext:*posix-argv*))