- fixed deprecated proc

www/file-storage-treemodel.tcl

@@ -20,7 +20,7 @@ ad_page_contract {
 # Defaults & Security
 # ---------------------------------------------------------------
 
-set user_id [ad_maybe_redirect_for_registration]
+set user_id [auth::require_login]
 
 set file_storage_package_id [db_string fs_pid "select package_id from apm_packages where package_key = :package_key"]
 set file_storage_root_folder [fs::get_root_folder -package_id $file_storage_package_id]