diff --git a/tools/clog-builder-settings.lisp b/tools/clog-builder-settings.lisp
index e0416f5..2ad1cf9 100644
--- a/tools/clog-builder-settings.lisp
+++ b/tools/clog-builder-settings.lisp
@@ -517,7 +517,7 @@
      :clog-type      clog:clog-element
      :create         clog:create-child
      :create-type    :custom-query
-     :create-content "<div><button>test</button></div>"
+     :create-content "<div></div>"
      :events         (,@*events-element*)
      :properties     (,@*props-base*))
    `(:name           "label"
diff --git a/tools/clog-builder.lisp b/tools/clog-builder.lisp
index 94db4cf..906ab68 100644
--- a/tools/clog-builder.lisp
+++ b/tools/clog-builder.lisp
@@ -193,7 +193,7 @@
   (let* ((control-record    (control-info (value (select-tool app))))
 	 (control-type-name (getf control-record :create-type)))
     (if (eq control-type-name :custom-query)
-	(input-dialog win "Enter custom html:"
+	(input-dialog win "Enter html (must have an outer element):"
 		      (lambda (custom-query)
 			(when custom-query
 			  (do-drop-new-control