Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -N -r1.124 -r1.125
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	10 Dec 2017 15:15:45 -0000	1.124
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	10 Dec 2017 21:09:13 -0000	1.125
@@ -1201,7 +1201,7 @@
         } on error {errMsg} {
             ds_add rp [list serve_file [list $file $handler] $startclicks [clock clicks -microseconds] \
                            error "$::errorCode: $::errorInfo"]
-            return -code $errno -errorcode $::errorCode -errorinfo $::errorInfo $error
+            return -code error -errorcode $::errorCode -errorinfo $::errorInfo $errMsg
         } on ok {r} {
             ds_add rp [list serve_file [list $file $handler] $startclicks [clock clicks -microseconds]]
         } finally {