remove debug lines

This commit is contained in:
David Botton 2022-07-28 09:36:07 -04:00
parent a566c5829f
commit 1ef96c7a96

View file

@ -2200,8 +2200,6 @@ of controls and double click to select control."
(name (format nil "~A" (definitions:designator c)))
(filter (text-value (search-box panel)))
(class-only (checkedp (class-only panel))))
(print name)
(print filter)
(if (or (equal filter "")
(search filter name :test #'char-equal))
(if class-only