Patch title: Release 90 bulk changes
Abstract:
File: /protocol/http/site.page
Key:
    Removed line
    Added line
   
module "/pliant/util/crypto/rsa.pli"
module "/pliant/util/crypto/legal.pli"
module "/pliant/admin/file.pli"
module "/pliant/language/context.pli"
module "/pliant/fullpliant/this_computer.pli"
module "/pliant/fullpliant/user.pli"
module "/pliant/protocol/dns/name.pli"
module "site.pli"
module "/pliant/language/stream.pli"
module "/pliant/util/network/ping.pli"
module "/pliant/util/encoding/base64.pli"


para
  note "HTTP and FTP global settings for this computer"
    read_only not allowed:"administrator"
    title "This computer HTTP and FTP settings"
    header "HTTP settings"
      table columns 3 border 0
        cell [HTTP service:]
        cell
          fixed [Yes]
        cell [We always run the HTTP server because we need 
        cell [Secured connections:]
        cell
          fixed [Yes]
        cell [We always listen for secured connections on TC
        cell [Log file:]
        cell
          var Str log := this_computer "pliant" "http" "log"
          input "" log length 30 noeol
        cell [If not empty, all dialogs with HTTP clients co
        cell [TCP port:]
        cell
          var Str port := this_computer "pliant" "http" "por
          input "" port length 4 noeol
        cell [The default TCP port for the HTTP server is 80
    header "FTP settings"
      table columns 3 border 0
        cell [FTP service:]
        cell
          var Str ftp := this_computer "pliant" "ftp" "servi
          select "" ftp
module "/pliant/util/crypto/rsa.pli"
module "/pliant/util/crypto/legal.pli"
module "/pliant/admin/file.pli"
module "/pliant/language/context.pli"
module "/pliant/fullpliant/this_computer.pli"
module "/pliant/fullpliant/user.pli"
module "/pliant/protocol/dns/name.pli"
module "site.pli"
module "/pliant/language/stream.pli"
module "/pliant/util/network/ping.pli"
module "/pliant/util/encoding/base64.pli"


para
  note "HTTP and FTP global settings for this computer"
    read_only not allowed:"administrator"
    title "This computer HTTP and FTP settings"
    header "HTTP settings"
      table columns 3 border 0
        cell [HTTP service:]
        cell
          fixed [Yes]
        cell [We always run the HTTP server because we need 
        cell [Secured connections:]
        cell
          fixed [Yes]
        cell [We always listen for secured connections on TC
        cell [Log file:]
        cell
          var Str log := this_computer "pliant" "http" "log"
          input "" log length 30 noeol
        cell [If not empty, all dialogs with HTTP clients co
        cell [TCP port:]
        cell
          var Str port := this_computer "pliant" "http" "por
          input "" port length 4 noeol
        cell [The default TCP port for the HTTP server is 80
    header "FTP settings"
      table columns 3 border 0
        cell [FTP service:]
        cell
          var Str ftp := this_computer "pliant" "ftp" "servi
          select "" ftp
            option "Yes" "true"
            option "No" "false"
            option "No" "false"
            option "Yes" "true"
        cell [Should we run the FTP service on this server ?
    if allowed:"administrator"
      button "Update"
        this_computer "pliant" "http" "log" := log
        this_computer "pliant" "http" "port" := port
        this_computer "pliant" "ftp" "service" := ftp
        goto_backward
     


        cell [Should we run the FTP service on this server ?
    if allowed:"administrator"
      button "Update"
        this_computer "pliant" "http" "log" := log
        this_computer "pliant" "http" "port" := port
        this_computer "pliant" "ftp" "service" := ftp
        goto_backward