 
                     (ring.util.response/response row))))
 
-           )
+           (POST "/delete" request
+                 (-> request
+                     :params
+                     :id
+                     ((partial ix/com-delete-for-id ix/webuser))
+                     ring.util.response/response
+                     cw/error-response-json))
+
+           )  
   )
 ;; END Users reference book
 ;;..................................................................................................

                 (ix/tag-tree-as-flat-groups)))

           ;; TAGS WORK ------------------------------------------------------
           (POST "/save" request
                 (-> request
                     :params

                        {:id (if (= tag-id "root") nil tag-id)})

                       (as-> query
                           (let [fts-query (clojure.string/trim fts-query)]
                             (if (empty? fts-query) query
                                 (ix/webdoc-pred-search* query fts-query))))
                       
