mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-07 11:10:18 -08:00
Code Issues Projects Releases Wiki Activity

remove debug lines

Browse source
This commit is contained in:
David Botton 2022-07-28 09:36:07 -04:00
parent a566c5829f
commit 1ef96c7a96
1 changed files with 0 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
tools/clog-builder.lisp
View file

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