self optionAt: 'vncport' ifPresent: [:portString|
   | rfb |
   Deprecation showWarning: false.
   Deprecation raiseWarning: false.
   RFBServer reset.
   rfb := RFBServer current.
   self optionAt: 'vncpassword' ifPresent: [:password|
      rfb setFullPassword: password
   ].
   rfb start: portString asNumber.
   self log: 'RFB vnc server started on port ', portString
].
