Index: openacs-4/packages/acs-tcl/tcl/defs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/defs-procs.tcl,v diff -u -r1.38 -r1.39 --- openacs-4/packages/acs-tcl/tcl/defs-procs.tcl 1 Nov 2003 09:23:39 -0000 1.38 +++ openacs-4/packages/acs-tcl/tcl/defs-procs.tcl 30 Dec 2003 22:18:50 -0000 1.39 @@ -412,21 +412,14 @@ @param title Title to be used for the error (will be shown to user) @param explanation Explanation for the exception. } { - set page "[ad_header_with_extra_stuff $title "" ""] -

$title

\n
$explanation\n[ad_footer]" - - # JCD: IE 5 and 6 have a "friendly HTTP errors" setting which - # prevent display of short error return pages so here we pad them - # out to circumvent it. Unfortunately quite a few pages use - # ad_return_error with links to other pages (download for - # example among others + set page [ad_parse_template -params [list [list title $title] [list explanation $explanation]] "/packages/acs-tcl/lib/ad-return-error"] if {$status > 399 && [string match {*; MSIE *} [ns_set iget [ad_conn headers] User-Agent]] && [string length $page] < 512 } { append page [string repeat " " [expr 513 - [string length $page]]] } - doc_return $status text/html $page + ns_return $status text/html $page # raise abortion flag, e.g., for templating global request_aborted