Skip to content

I
intranet-exchange-rate
Commit 366c0be0 authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- replace ad_parameter by im_parameter for OpenACS

parent aaba89ff
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
tcl/intranet-exchange-rate-procs.tcl
View file @ 366c0be0
......@@ -56,7 +56,7 @@ ad_proc im_exchange_rate_outdated_currencies { } {
Otherwise returns a list of currency - days_outdated
for the "supported_currencies" that are outdated.
} {
set max_days_outdated [ad_parameter -package_id [im_package_exchange_rate_id] "MaxDaysOutdated" "" 7]
set max_days_outdated [im_parameter -package_id [im_package_exchange_rate_id] "MaxDaysOutdated" "" 7]
set currency_date_map [im_exchange_rate_outdated_map]
set result [list]
......
www/index.tcl
View file @ 366c0be0
......@@ -41,7 +41,7 @@ if {"" == $year} {
set supported_currencies [im_supported_currencies]
set missing_text "<strong>No packages match criteria.</strong>"
set use_watches_p [expr ! [ad_parameter -package_id [ad_acs_kernel_id] PerformanceModeP request-processor 1]]
set use_watches_p [expr ! [im_parameter -package_id [ad_acs_kernel_id] PerformanceModeP request-processor 1]]
set return_url "[ad_conn url]?[ad_conn query]"
set table_def {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment