I installed Jeff's photo-album package, available at xarg.net, and get the following error. I downloaded and installed the package using the package manager. The system is RH 8.0, PG 7.2.3, OACS 4.6.3-beta2. Thanks for any help.
invalid command name "pa_get_root_folder"
while executing
"pa_get_root_folder]"
invoked from within
"subst {[pa_get_root_folder]}"
("uplevel" body line 1)
invoked from within
"uplevel subst \{$apc_default_value($formal_name)\}"
(procedure "ad_page_contract" line 489)
invoked from within
"ad_page_contract {
Photo album front page. List the albums and subfolders in the folder specified
Uses package root folder if none specified..."
("uplevel" body line 4)
invoked from within
"uplevel {
# /packages/photo-album/www/index.tcl
ad_page_contract {
Photo album front page. List the albums and subfolders in the folder ..."
(procedure "code::tcl::/web/openpharma/packages/photo-album/www/index" line 2)
invoked from within
"code::tcl::$__adp_stub"
invoked from within
"if { [file exists $__adp_stub.tcl] } {
# ensure that data source preparation procedure exists and is up-to-date
adp_init tcl $__adp_stub
..."
("uplevel" body line 3)
invoked from within
"uplevel {
if { [file exists $__adp_stub.tcl] } {
# ensure that data source preparation procedure exists and is up-to-date
adp_init t..."
(procedure "adp_prepare" line 2)
invoked from within
"adp_prepare "
(procedure "template::adp_parse" line 30)
invoked from within
"template::adp_parse [file root [ad_conn file]] {}"
(procedure "adp_parse_ad_conn_file" line 7)
invoked from within
"$handler"
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
$handler
} ad_script_abort val {
# do nothing
}"
invoked from within
"rp_serve_concrete_file [ad_conn file]"
(procedure "rp_serve_abstract_file" line 60)
invoked from within
"rp_serve_abstract_file "$root/$path""
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
rp_serve_abstract_file "$root/$path"
set tcl_url2file([ad_conn url]) [ad_conn file]
set tcl_url2path_info([ad_conn url]) [ad_conn path_inf..."
Request notifications