fs_order_files db { user_id " " } { group_id " " } { public_p " " }What it does:
Set the ordering and depth for the files so that they may be displayed quicklyDefined in: /web/philip/tcl/file-storage-defs.tcl
Source code:
# Note: The following query must not use any WHERE clause.
# Otherwise, Oracle will change the ordering.
set ordering_query "select file_id, the_level from fs_files_tree"
set order_depth_list [database_to_tcl_list_list $db $ordering_query]
set sort_key 1
foreach id_depth $order_depth_list {
set id [lindex $id_depth 0]
set depth [expr [lindex $id_depth 1]-1]
ns_db dml $db "update fs_files set sort_key=$sort_key, depth=$depth where file_id=$id"
incr sort_key
}