Index: openacs-4/contrib/packages/bcms-ui-base/templates/bcms-ui-base/search-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/bcms-ui-base/templates/bcms-ui-base/search-view.tcl,v diff -u -N -r1.2 -r1.3 --- openacs-4/contrib/packages/bcms-ui-base/templates/bcms-ui-base/search-view.tcl 4 Oct 2003 08:46:40 -0000 1.2 +++ openacs-4/contrib/packages/bcms-ui-base/templates/bcms-ui-base/search-view.tcl 27 Oct 2003 10:17:21 -0000 1.3 @@ -1,8 +1,12 @@ ad_page_contract { display search results } { - name_search:optional {display_search_results:optional 0} + {name_search:optional ""} + {title_search:optional ""} + {content_search:optional ""} + {orderby:optional name,asc} + {page:optional 1} } if {$display_search_results} { @@ -14,3 +18,10 @@ set package_url [ad_conn package_url] set context [list [list $package_url "Search"] $title] +# check the permission if user has permission for the package +if {![permission::permission_p -object_id [ad_conn package_id] -privilege admin]} { + ad_return_forbidden "Serurity Violation" "You don't have permission to administer. This incident has been logged." + ad_script_abort +} + +