Patch title: Release 94 bulk changes
Abstract:
File: /pliant/appli/cluster/database.pli
Key:
    Removed line
    Added line
   
submodule "/pliant/appli/database.pli"
submodule "/pliant/storage/database.pli"


function cluster_init
  each area cluster_database:data:area
    if area:status<>" "
      area status := " "
cluster_init


function cluster_init
  each area cluster_database:data:area
    if area:status<>" "
      area status := " "
cluster_init