#  $Id: windows.exp,v 1.5 2000/06/02 08:36:03 clarep Exp $
#  Copyright (C) 1998 The Santa Cruz Operation
#  This software code contains proprietary information
#  and should be treated as confidential.
#
#  Component: windows.exp
#  Author: J. Musgrave
#
#  windows.exp is responsible for launching the necessary
#  launch expect script for the various windows protocols.
#  It currently handles wincenter, merge and winframe.
#

lowercase "TTA_WindowsApplicationServer" "$env(TTA_WindowsApplicationServer)"
switch $env(TTA_WindowsApplicationServer) {
    wincenter -
    wincentermf {
	source wincenter.exp
    }
    merge {
	source unixwin.exp
    }
    winframe {
	source unixwin.exp
    }
    wts    -
    wcpwts {
	source wcpwts.exp
    }
    default {
	# No match so this is an error
	send_error "windows.exp: No windows protocol selected"
	exit $exitCode(ErrCommandExecutionFailed)
    }
}
