diff --git a/source/clog-base.lisp b/source/clog-base.lisp
index b39eddd..c106e1a 100644
--- a/source/clog-base.lisp
+++ b/source/clog-base.lisp
@@ -22,7 +22,7 @@ own context and therefore its own copy of this variable when
 dynamically bound. As a result no thread protection is needed to
 access. To use dynamically bind the *connection-cache* and set it
 to (list :cache) turn on caching. By default this is off its main use
-is in initial setup complex pages. (private)
+is during initial setup of complex pages. (private)
 See macro with-connection-cache.")
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -584,7 +584,6 @@ object"))
 (defmethod set-on-resize ((obj clog-obj) handler)
   (set-on-event obj "resize" handler))
 
-
 ;;;;;;;;;;;;;;;;;;
 ;; set-on-focus ;;
 ;;;;;;;;;;;;;;;;;;
@@ -683,7 +682,6 @@ is nil unbind the event."))
 (defmethod set-on-drag-enter ((obj clog-obj) handler)
   (set-on-event obj "dragenter" handler))
 
-
 ;;;;;;;;;;;;;;;;;;;;;;;
 ;; set-on-drag-leave ;;
 ;;;;;;;;;;;;;;;;;;;;;;;
diff --git a/source/clog-element.lisp b/source/clog-element.lisp
index faaa96c..a7f97d7 100644
--- a/source/clog-element.lisp
+++ b/source/clog-element.lisp
@@ -71,17 +71,21 @@ CONNECTION-ID to it and then return it. The HTML-ID must be unique. (private)"
 ;; Low Level - clog-element
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-;;;;;;;;;;;;;;;;;;
+;;;;;;;;;;;;;;;;;;;;
 ;; create-element ;;
-;;;;;;;;;;;;;;;;;;
-(defgeneric create-element (clog-obj html-tag &rest all-args &key content clog-type html-id
-                                                                  auto-place &allow-other-keys )
-  (:documentation "Create a new CLOG-element as child of CLOG-OBJ with any possible keywords.")
-  (:method (clog-obj html-tag &rest all-args &key (content "")
-                                                  clog-type
-                                                  (html-id (clog-connection:generate-id))
-                                                  (auto-place t)
-                              &allow-other-keys )
+;;;;;;;;;;;;;;;;;;;;
+
+(defgeneric create-element (clog-obj html-tag &rest all-args
+			    &key content clog-type html-id auto-place
+			    &allow-other-keys)
+  (:documentation "Create a new CLOG-element as child of CLOG-OBJ with any possible keyword."))
+
+(defmethod create-element (clog-obj html-tag &rest all-args
+			   &key (content "")
+			     clog-type
+                             html-id
+                             (auto-place t)
+                           &allow-other-keys)
     (let* ((extra-args (alexandria:remove-from-plist all-args :content :clog-type :html-id :auto-place))
            (html (with-output-to-string (*standard-output*)
                    (format t "<~(~a~) " html-tag)
@@ -96,7 +100,7 @@ CONNECTION-ID to it and then return it. The HTML-ID must be unique. (private)"
       (create-child clog-obj html
                     :clog-type  clog-type
                     :html-id    html-id
-                    :auto-place auto-place))))
+                    :auto-place auto-place)))
 
 ;;;;;;;;;;;;;;;;;;
 ;; create-child ;;
@@ -518,7 +522,7 @@ Normally index follows normal sequence of elements."))
 <tag>Text Content</tag> - Text content is the content contained by the
                           tag including child tags. This should not be
                           confused with the 'Value' of a Form Tag.
-                          User TEXT-VALUE for just the text associated
+                          Use TEXT-VALUE for just the text associated
                           with <tag>. (See clog-form.lisp)"))
 
 (defmethod text ((obj clog-element))
@@ -538,7 +542,7 @@ Normally index follows normal sequence of elements."))
 (defgeneric text-value (clog-element)
   (:documentation "Get/Setf the first text node of CLOG-ELEMENT.
 Unlike TEXT this is only the text associated with this <tag>
-Additionally for forms get/setf the value."))
+Additionally works for forms and can get/setf the values."))
 
 (defmethod text-value ((obj clog-element))
   (jquery-query obj (format nil "contents().not(~A.children()).text()"
@@ -958,7 +962,6 @@ flex-basis (default :auto = use width or height) for CLOG-ELEMENT"))
                      &key (grow 0) (shrink 1) (flex-basis :auto))
   (setf (style obj "flex") (format nil "~A ~A ~A" grow shrink flex-basis)))
 
-
 ;;;;;;;;;;;;;;;
 ;; flex-wrap ;;
 ;;;;;;;;;;;;;;;