roswell.roswell/lisp/dist-delete.lisp
2018-09-05 17:35:35 +09:00

10 lines
202 B
Common Lisp

(defpackage :roswell.dist.delete
(:use :cl)
(:shadow :delete))
(in-package :roswell.dist.delete)
(defun delete (&rest r)
(dolist (elm (rest r))
(ql-dist:uninstall (ql-dist:find-dist elm))))