@verb #3797:"ls_chan" this none this rxdo #833
@program #3797:"ls_chan" this none this
if (args)
  {comm} = args
  chans = {}
  for chan in (this.channels)
    if (comm in chan[2][1])
      chans = {@chans, chan[1]}
    endif
  endfor
  return chans
else
  return $list_utils:slice(this.channels)
endif
.