                       (as-> query
                           (let [fts-query (clojure.string/trim fts-query)]
                             (if (empty? fts-query)
-                              (korma.core/order query :id :desc)
+                              query
                               (ix/webdoc-pred-search* query fts-query))))
 
+                      (korma.core/order :id :desc)
                       ix/com-exec
                       ((partial map #(dissoc % :password)))
                       ring.util.response/response))

                        (as-> query
                            (let [fts-query (clojure.string/trim fts-query)]
                              (if (empty? fts-query)
                                (korma.core/order query :id :desc)
                                (ix/webdoc-pred-search* query fts-query))))

                        ix/com-exec
                        ((partial map #(dissoc % :password)))))))


                        (ix/webdoc-pred-search-for-the-child-tree-tags*
                         {:id (if (= tag-id "root") nil tag-id)})

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

                        (korma.core/order :id :desc)                     
                        ix/com-exec
                        korma.db/transaction
                        ring.util.response/response
