Patch title: Release 84 bulk changes
Abstract:
File: /pliant/fullpliant/run.pli
Key:
    Removed line
    Added line
   
abstract
  [This is the script that will start the FullPLiant operati


abstract
  [This is the script that will start the FullPLiant operati


if (constant this_computer:env:"pliant":"cluster":"service"="true")
  precompile += "/pliant/appli/cluster/server.pli[lf]"
  module "/pliant/appli/cluster/server.pli"
if (constant this_computer:env:"pliant":"cluster":"daemon"="true")
  precompile += "/pliant/appli/cluster/daemon.pli[lf]"
  module "/pliant/appli/cluster/daemon.pli"

if (constant this_computer:env:"pliant":"lpr":"service"="tru
  precompile += "/pliant/protocol/lpr/server.pli[lf]"
  module "/pliant/protocol/lpr/server.pli"
  lpr_server detached
eif (constant this_computer:env:"printer":size>0)
  precompile += "/pliant/protocol/lpr/spool.pli[lf]"
  module "/pliant/protocol/lpr/spool.pli"
  lpr_spool
  console "Print spooler is now running." eol


function run_dynamic_servers
  if (constant this_computer:env:"pliant":"remote":"service"
    remote_server detached
if (constant this_computer:env:"pliant":"lpr":"service"="tru
  precompile += "/pliant/protocol/lpr/server.pli[lf]"
  module "/pliant/protocol/lpr/server.pli"
  lpr_server detached
eif (constant this_computer:env:"printer":size>0)
  precompile += "/pliant/protocol/lpr/spool.pli[lf]"
  module "/pliant/protocol/lpr/spool.pli"
  lpr_spool
  console "Print spooler is now running." eol


function run_dynamic_servers
  if (constant this_computer:env:"pliant":"remote":"service"
    remote_server detached
  if (constant this_computer:env:"pliant":"cluster":"service"="true")
    cluster_server detached
  if (constant this_computer:env:"pliant":"cluster":"daemon"="true")
    cluster_daemon
  if not (this_computer:env:"pliant":"http":"port" parse (gv
    port := 80
  if (constant this_computer:env:"pliant":"system":"medium"=
    thread
      sleep 15
      recover_menu
  http_server port port secured log this_computer:env:"plian
  sleep 15
this_computer "pliant" "language" "recommended" := precompil
run_dynamic_servers

  if not (this_computer:env:"pliant":"http":"port" parse (gv
    port := 80
  if (constant this_computer:env:"pliant":"system":"medium"=
    thread
      sleep 15
      recover_menu
  http_server port port secured log this_computer:env:"plian
  sleep 15
this_computer "pliant" "language" "recommended" := precompil
run_dynamic_servers