[求助]： 我的lisp程序为什么会有这个提示？

clhclh

我的程序在运行过程中会出现“INTERSECT 所选对象太多”但运行结果是正确的，这是为什么呀？

程序如下：

(defun c:cs()
(setvar "CMDECHO" 0)
(setq pt1 (getpoint "指定图框插入点:"))
        (command "insert" "预览图框" pt1 "" "" "")
        (setq el (entlast))
        (command "scale" el "" pt1 "r" "1" pause )
)


但不知道为什么，有时候又不会出现那个提示