Class ::xowiki::formfield::page
::xowiki::formfield::page
create ... \
[ -entry_label (default "name") ] \
[ -glob glob ] \
[ -type (default "::xowiki::Page") ] \
[ -with_subtypes (default "false") ]
Class Relations
- class: ::xotcl::Class
![[i]](/resources/acs-subsite/ZoomIn16.gif)
- superclass: ::xowiki::formfield::abstract_page
![[i]](/resources/acs-subsite/ZoomIn16.gif)
::xotcl::Class create ::xowiki::formfield::page \
-superclass ::xowiki::formfield::abstract_page
Methods (to be applied on instances)
compute_options (scripted)
set extra_where_clause ""
if {[info exists :glob]} {
append extra_where_clause [::xowiki::Includelet glob_clause ${:glob}]
}
set package_id [${:object} package_id]
set :options [list]
::xo::dc foreach instance_select [${:type} instance_select_query -folder_id [::$package_id folder_id] -with_subtypes ${:with_subtypes} -select_attributes [list title] -from_clause ", xowiki_page p" -where_clause "p.page_id = bt.revision_id $extra_where_clause" -orderby ci.name ] {
lappend :options [list [set ${:entry_label}] $name]
}entry_label (setter)
glob (setter)
pretty_value (scripted)
set :package_id [${:object} package_id]
nexttype (setter)
with_subtypes (setter)