"{ Package: 'stx:libview' }"

"{ NameSpace: Smalltalk }"

DeviceWorkstation subclass:#ElectronWorkstation
	instanceVariableNames:'bridge'
	classVariableNames:''
	poolDictionaries:''
	category:'Interface-Graphics'
!

!ElectronWorkstation class methodsFor:'documentation'!

documentation
"
    ElectronWorkstation newFor:nil
"
! !

!ElectronWorkstation methodsFor:'accessing & queries'!

isOpen
    "return true, if there is a valid connection to the display"

    ^ bridge notNil
! !

!ElectronWorkstation methodsFor:'initialization & release'!

closeConnection
    "close down connection to Display - usually never done"

    |b|

    (b := bridge) notNil ifTrue:[
        bridge := nil.
        b close
    ].

    "Created: 13.1.1997 / 22:10:07 / cg"
!

initializeFor:aHostAndPortStringOrNil
    bridge := NodeJSBridge newBridgeForHostAndPort:aHostAndPortStringOrNil.
    bridge 
        startBridgeIn:'.'
        command:'node' 
        environment:nil 
        debug:false.
    bridge connect.

    "
     ElectronWorkstation newFor:'localhost:8098'
    "
! !

!ElectronWorkstation class methodsFor:'documentation'!

version_CVS
    ^ '$Header$'
! !