xowf::WorkflowPage instproc render_thumbnails (public)

 <instance of xowf::WorkflowPage> render_thumbnails upload_info

Defined in /var/www/openacs.org/packages/xowf/tcl/test-item-procs.tcl

Renderer of the thumbnail file(s)

Parameters:

upload_info (required)

dict containing the "file_object" and "file_name"

Returns:

HTML content

Testcases:

No testcase defined.

Source code:

dict with upload_info {
  set parent_id ${:item_id}
  set feedbackFiles [xo::dc list_of_lists . {
    select item_id, name from cr_items where parent_id = :parent_id
  }]
  if {[regexp {^([^/]+)/} $file_name . qn]} {
    set HTML [:QM render_feedback_files  -question_name $qn  -feedbackFiles $feedbackFiles]
  } else {
    set HTML "$file_name created"
  }
}
return $HTML

XQL Not present:

Generic, PostgreSQL, Oracle