Add "composure" from "https://github.com/erichs/composure@1.3.1"

git-vendor-name: composure
git-vendor-dir: vendor/github.com/erichs/composure
git-vendor-repository: https://github.com/erichs/composure
git-vendor-ref: 1.3.1

vendor/github.com/erichs/composure/c_extras.sh

@@ -0,0 +1,145 @@
+#!/bin/bash
+
+_basename_no_extension () {
+  sed -e 's/^.*\/\(.*\)\.inc$/\1/'
+}
+
+_composure_functions () {
+  _list_composure_files | _basename_no_extension
+}
+
+_load_tab_completions () {
+  # support tab completion for 'revise' command
+  # you may disable this by adding the following line to your shell startup:
+  # export COMPOSURE_TAB_COMPLETION=0
+
+  if [ "$COMPOSURE_TAB_COMPLETION" = "0" ]; then
+    return  # if you say so...
+  fi
+
+  case "$(_shell)" in
+    zsh)
+      read -r -d '' SCRIPT <<ZSHDATA
+_zsh_revise_complete () {
+   typeset word completions
+   word="\$1"
+   completions="\$(_composure_functions)"
+   reply=( "\${(ps:\n:)completions}" )
+}
+compctl -K _zsh_revise_complete revise
+ZSHDATA
+      eval "$SCRIPT"
+      unset SCRIPT
+      ;;
+    bash)
+      read -r -d '' SCRIPT <<BASHDATA
+_bash_revise_complete () {
+  typeset cur
+  cur=\${COMP_WORDS[COMP_CWORD]}
+  COMPREPLY=( \$(compgen -W "\$(_composure_functions)" -- \$cur) )
+  return 0
+}
+complete -F _bash_revise_complete revise
+BASHDATA
+      eval "$SCRIPT"
+      unset SCRIPT
+      ;;
+    *)
+      echo "composure tab completions unavailable"
+      ;;
+  esac
+}
+
+# Second-order functions for composure
+
+findgroup ()
+{
+    about 'finds all functions belonging to group'
+    param '1: name of group'
+    example '$ findgroup tools'
+    group 'composure'
+
+    typeset func
+    for func in $(_typeset_functions)
+    do
+        typeset group="$(typeset -f $func | metafor group)"
+        if [ "$group" = "$1" ]; then
+            echo "$func"
+        fi
+    done
+}
+
+overview ()
+{
+    about 'gives overview of available shell functions, by group'
+    group 'composure'
+
+    # display a brief progress message...
+    printf '%s' 'building documentation...'
+    typeset grouplist=$(mktemp /tmp/grouplist.XXXX);
+    typeset func;
+    for func in $(_typeset_functions);
+    do
+        typeset group="$(typeset -f $func | metafor group)";
+        if [ -z "$group" ]; then
+            group='misc';
+        fi;
+        typeset about="$(typeset -f $func | metafor about)";
+        _letterpress "$about" $func >> $grouplist.$group;
+        echo $grouplist.$group >> $grouplist;
+    done;
+    # clear progress message
+    printf '\r%s\n' '                          '
+    typeset group;
+    typeset gfile;
+    for gfile in $(cat $grouplist | sort | uniq);
+    do
+        printf '%s\n' "${gfile##*.}:";
+        cat $gfile;
+        printf '\n';
+        command rm $gfile 2> /dev/null;
+    done | less
+    command rm $grouplist 2> /dev/null
+}
+
+recompose ()
+{
+    about 'loads a stored function from ~/.composure repo'
+    param '1: name of function'
+    example '$ load myfunc'
+    group 'composure'
+
+    . $(_get_composure_dir)/$1.inc
+}
+
+unique_metafor ()
+{
+    about 'displays all unique metadata for a given keyword'
+    param '1: keyword'
+    example '$ unique_metafor group'
+    group 'composure'
+
+    typeset keyword=$1
+
+    typeset file=$(mktemp /tmp/composure.XXXX)
+    typeset -f | metafor $keyword >> $file
+    cat $file | sort | uniq
+    command rm $file 2>/dev/null
+}
+
+compost () {
+	about 'delete function stored in composure repo'
+	param '1: name of function'
+	example '$ compost myfunc'
+	group 'composure'
+
+  typeset func=$1
+  [ -z "$func" ] && echo "you must specify a function name!" && return 1
+
+  (
+	  cd $(_get_composure_dir)
+    git rm "$func.inc" && git commit -m "Delete function $func"
+  )
+}
+
+_load_tab_completions