esac
}
+type -P timeout > /dev/null || timeout() {
+ local p
+ if p=`which timeout 2>/dev/null`; then
+ $p $@
+ else
+ perl -e 'BEGIN{$|=1}; $SIG{ALRM}=sub{exit 1}; alarm(shift @ARGV); system join(" ",@ARGV)' -- $@
+ fi
+}
+
nb_repos() {
[ -z "$FUNCNAME" ] && local FUNCNAME='nb_repos' # for busybox
(
done
}
-# NB 13.12.16: TODO replace with nb_repos and nb_repos_ls
-# NB 21.10.17 nb_repo() {
-# NB 21.10.17 [ -z "$FUNCNAME" ] && local FUNCNAME='nb_repo' # for busybox
-# NB 21.10.17 if [ -z "$*" ]; then
-# NB 21.10.17 # Find repos
-# NB 21.10.17 (
-# NB 21.10.17 echo "$NB_ROOT"
-# NB 21.10.17 (
-# NB 21.10.17 local dir
-# NB 21.10.17 for dir in $(ls -d1 \
-# NB 21.10.17 /*/*/.nb-install \
-# NB 21.10.17 /usr/local/src/*/.nb-install \
-# NB 21.10.17 \
-# NB 21.10.17 /home/*/*/.nb-install \
-# NB 21.10.17 /Users/*/*/.nb-install \
-# NB 21.10.17 \
-# NB 21.10.17 /home/*/git/*/.nb-install \
-# NB 21.10.17 /Users/*/git/*/.nb-install \
-# NB 21.10.17 \
-# NB 21.10.17 /home/*/app/*/.nb-install \
-# NB 21.10.17 /Users/*/app/*/.nb-install \
-# NB 21.10.17 \
-# NB 21.10.17 /home/*/code/*/.nb-install \
-# NB 21.10.17 /Users/*/code/*/.nb-install \
-# NB 21.10.17 2>/dev/null \
-# NB 21.10.17 ); do
-# NB 21.10.17 dir=$(dirname "$dir")
-# NB 21.10.17 realpath "$dir"
-# NB 21.10.17 done
-# NB 21.10.17 )
-# NB 21.10.17 ) | awk \!'x[$0]++'
-# NB 21.10.17
-# NB 21.10.17 else
-# NB 21.10.17
-# NB 21.10.17 # Look for paths
-# NB 21.10.17 local d f i repo ifs_bak="$IFS"; IFS=$'\n'
-# NB 21.10.17 for d in `$FUNCNAME`; do
-# NB 21.10.17
-# NB 21.10.17 for f in "$@"; do
-# NB 21.10.17
-# NB 21.10.17 false && echo "====$d/$f"
-# NB 21.10.17 #for repo in $(ls -d1 $d/$f 2>/dev/null); do
-# NB 21.10.17 for repo in $d/$f; do
-# NB 21.10.17 [ -e "$repo" ] && echo "$repo"
-# NB 21.10.17 done
-# NB 21.10.17
-# NB 21.10.17 done
-# NB 21.10.17
-# NB 21.10.17 done
-# NB 21.10.17
-# NB 21.10.17 IFS="$ifs_bak"
-# NB 21.10.17
-# NB 21.10.17 fi
-# NB 21.10.17
-# NB 21.10.17 }
-
-timeout() {
- local p
- if p=`which timeout 2>/dev/null`; then
- $p $@
- else
- perl -e 'BEGIN{$|=1}; $SIG{ALRM}=sub{exit 1}; alarm(shift @ARGV); system join(" ",@ARGV)' -- $@
- fi
-}
-
shell_help() {
#
# Print help message and return true if args contains -?-h(elp)?