Index: openacs-4/packages/contacts/tcl/oo-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/oo-procs.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/contacts/tcl/oo-procs.tcl 12 Aug 2018 12:30:06 -0000 1.13 +++ openacs-4/packages/contacts/tcl/oo-procs.tcl 26 Nov 2024 08:27:28 -0000 1.14 @@ -978,9 +978,11 @@ @param timeout Timeout in seconds for the JooC-Server @return 0 on error, 1 on success -} { - set response [ns_httpget [export_vars -base "http://192.168.1.19:8080/convert-pdf" -url {{oo_file $source_file} {pdf_file $destination_file}}]] - if {$response=="success"} { +} { + set URL [export_vars -base "http://192.168.1.19:8080/convert-pdf" -url {{oo_file $source_file} {pdf_file $destination_file}}] + set reply [ns_http run $URL] + set response [dict get $reply body] + if {$response eq "success"} { return 1 } else { return 0 Index: openacs-4/packages/dotlrn-ecommerce/lib/section.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/section.tcl,v diff -u -r1.47 -r1.48 --- openacs-4/packages/dotlrn-ecommerce/lib/section.tcl 25 Jan 2024 12:25:51 -0000 1.47 +++ openacs-4/packages/dotlrn-ecommerce/lib/section.tcl 26 Nov 2024 08:27:28 -0000 1.48 @@ -908,7 +908,7 @@ -# Used by en_US version of new_class_instance message +# "class_instances_pretty_name" is used by en_US version of new_class_instance message set class_instances_pretty_name [parameter::get -localize -parameter class_instances_pretty_name] -set f [rp_getform] -ns_set print $f +#set f [rp_getform] +#ns_set print $f Index: openacs-4/packages/postcard/www/load-cards.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/postcard/www/load-cards.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/postcard/www/load-cards.tcl 5 Sep 2002 12:57:45 -0000 1.2 +++ openacs-4/packages/postcard/www/load-cards.tcl 26 Nov 2024 08:27:28 -0000 1.3 @@ -10,7 +10,8 @@ apm_load_xml_packages -set xml_data [ns_httpget "http://kiki7/postcard/dump-cards"] +set reply [ns_http run "http://kiki7/postcard/dump-cards"] +set xml_data [dict get $reply body] set tree [dom::DOMImplementation parse $xml_data] #set doc [dom::node cget $tree -firstChild]