              (as-> query
                  (let [fts-query (clojure.string/trim fts-query)]
                    (if (empty? fts-query)
-                     (korma.core/order query :id :desc)
+                     query
                      (ix/files-pred-search* query fts-query))))
 
+             (korma.core/order :id :desc)
              ix/com-exec
              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)))
                      ring.util.response/response))

                        (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
