Patch title: Release 87 bulk changes
Abstract:
File: /pliant/protocol/http/common/cache.pli
Key:
    Removed line
    Added line
   
module "/pliant/language/unsafe.pli"
module "/pliant/language/context.pli"
module "/pliant/admin/file.pli"
module "/pliant/graphic/image/prototype.pli"
module "/pliant/graphic/filter/io.pli"
module "/pliant/protocol/http/server.pli"
module "/pliant/language/data/id.pli"
module "/pliant/util/crypto/random.pli"
module "/pliant/util/encoding/base64.pli"
module "/pliant/language/data/cache.pli"
module "/pliant/language/compiler/type/inherit.pli"


method page image_cache_send id -> status
  arg_rw HtmlPage page ; arg Str id ; arg ExtendedStatus sta
  var Pointer:HttpRequest request :> page http_request
  var Link:ImageCache ca
  if (cache_search "/pliant/image/"+id ((addressof Link:Imag
    ca:sem rd_request
    if (exists ca:image)
      page reset_http_answer
module "/pliant/language/unsafe.pli"
module "/pliant/language/context.pli"
module "/pliant/admin/file.pli"
module "/pliant/graphic/image/prototype.pli"
module "/pliant/graphic/filter/io.pli"
module "/pliant/protocol/http/server.pli"
module "/pliant/language/data/id.pli"
module "/pliant/util/crypto/random.pli"
module "/pliant/util/encoding/base64.pli"
module "/pliant/language/data/cache.pli"
module "/pliant/language/compiler/type/inherit.pli"


method page image_cache_send id -> status
  arg_rw HtmlPage page ; arg Str id ; arg ExtendedStatus sta
  var Pointer:HttpRequest request :> page http_request
  var Link:ImageCache ca
  if (cache_search "/pliant/image/"+id ((addressof Link:Imag
    ca:sem rd_request
    if (exists ca:image)
      page reset_http_answer
      request answer_mime_type := "image/"+ca:format
      request answer_is_dynamic := false
      request send_header
      status := ca:image save request:stream "filter [dq]."+
      request send_header "mime [dq]image/"+ca:format+"[dq] static"
      status := ca:image save request:answer_stream "filter [dq]."+ca:format+"[dq] "+ca:options
      request send_footer
    else
      page reset_http_answer
      status := request send_static_file ca:file "mime [dq]i
    ca:sem rd_release
  else
    status := failure "no such image in the cache" # DO NOT 


      request send_footer
    else
      page reset_http_answer
      status := request send_static_file ca:file "mime [dq]i
    ca:sem rd_release
  else
    status := failure "no such image in the cache" # DO NOT