This procedure is defined in the server but not documented via ad_proc or proc_doc and may be intended as a private interface.
The procedure is defined as:
proc ::xowiki::validate_file {} { set form ::xowiki::f1 ;# form has to be named this way for the time being #set form [lindex [::xowiki::WikiForm info instances -closure] 0] $form instvar data $form get_uploaded_file set data [$form set data] if {[$data exists import_file] && [virus check [$data set import_file]]} { util_user_message -message "uploaded file contains a virus; upload rejected" return 0 } upvar title title if {$title eq ""} {set title [$data set upload_file]} # $form log "--F validate_file returns [$data exists import_file]" return [$data exists import_file] }