diff --git a/revitDwgImportCleaner.scr b/revitDwgImportCleaner.scr
index 1ebe274..1cbc28a 100644
--- a/revitDwgImportCleaner.scr
+++ b/revitDwgImportCleaner.scr
@@ -16,7 +16,9 @@
 (defun C:dax (/ ss)
     (graphscr)
     (setq ss (ssget "_A" '((0 . "XLINE"))))
-    (command "._erase" ss "")
+    (if ss
+        (command "._erase" ss "")
+    )
     (princ)
 )
 dax