mblib.sh

mb:maybehelp() {
  local msg="$1";shift
  if any equals_help "$@"; then
    warn "$msg"
    return 1
  fi
}

mb:maybehelp "mmsg" "$@" || return 1

any() {
  local pred="$1"; shift
  for i in "$@"; do
    if $pred $i; then
      return 0
    fi
  done
  return 1
}

every() {
  local pred="$1"; shift
  for i in "$@"; do
    if ! $pred $i; then
      return 1
    fi
  done
  return 0

}

equals_help() {
  [ "--help" = "$1" ]
}