[merge after #574][irteus/irtsensor.l] add :no-window arg in camera-model

[knorth55]

merge after #574
you can make no window camera model with (send camera-model :create-viewer :no-window nil) or below

(setq *camera-model*
      (make-camera-from-param :pwidth 600 :pheight 600 :fx 400 :fy 400 :cx 319.5 :cy 319.5
                              :name "camera" :create-viewer t :no-window t))

cc. @k-okada