*** /net/atmos/opt/mbone/vic2.6/sun4/VIC.SD.TCL	Mon Dec  5 09:29:20 1994
--- .sd.tcl	Sun Dec 18 17:18:08 1994
***************
*** 14,19 ****
--- 14,25 ----
  #
  # $Header: VIC.SD.TCL,v 1.6 94/12/05 00:29:05 mccanne Exp $
  
+ # further modifications:
+ #   - Invoke nevot_icc instead of vat.
+ #   - Allow for -r flag, specified by RTP option (this should
+ #     be an exclusive option list like fmt:, but that wouldn't be
+ #     backwards-compatible).
+ 
  set ipc_chan 0
  proc get_channel { confid } {
          global ipc_tab ipc_chan
***************
*** 37,42 ****
--- 43,49 ----
                  case $a {
                          fmt:* { set audiofmt [string range $a 4 end] }
                          vt  { set packetfmt "-v" }
+                         rtp      { set packetfmt "-r" }
                          lecture  { set mode "-l" }
                  }
          }
***************
*** 98,102 ****
--- 105,111 ----
  }
  
  set sd_menu(video) "fmt: vic nv ivs jpg"
+ set sd_menu(audio) "fmt: pcm idvi gsm lpc4\nvt\nrtp"
  set vic vic
+ set vat "nevot_icc"
  set use_ivs 1