S-completion

_S_complete()
{
  local cur=${COMP_WORDS[COMP_CWORD]}
  local first=${COMP_WORDS[1]}
  case ${COMP_CWORD} in
    1)
      COMPREPLY=( $(compgen -W "$(find $SCRIPT_DIRECTORIES -maxdepth 1 -type f -printf '%f\n')" -- $cur) )
      ;;
    *)
      if [[ $cur == -* ]]
      then
        local script=$(ls $SCRIPT_DIRECTORIES/$first)
        COMPREPLY=( $(compgen -W "$(get_help $script)" -- $cur) )
      else
        COMPREPLY=( $(compgen -W "$(ls)" -- $cur) )
      fi
      ;;
  esac
}
complete -F _S_complete S