Thank you for your reply, and sorry for not thinking a little more before
e-mailing.  Here is the output.  I think that this may be a vcsh problem
rather than a mr problem after looking at this.

S
mr: loading config /home/swhitton/.mrconfig
mr: including output of "cat ~/local/lib/vcsh"
mr: including output of "cat ~/.config/mr/config.d/*"
mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/jcr
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/work
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/imgs
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/websaves
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/notes
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/www
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: unknown repository type and no defined update command for 
/home/swhitton//home/swhitton/.config/vcsh/repo.d/cache.git

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: unknown repository type and no defined update command for 
/home/swhitton//home/swhitton/.config/vcsh/repo.d/core.git

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: unknown repository type and no defined update command for 
/home/swhitton//home/swhitton/.config/vcsh/repo.d/desktop.git

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: unknown repository type and no defined update command for 
/home/swhitton//home/swhitton/.config/vcsh/repo.d/mr.git

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: unknown repository type and no defined update command for 
/home/swhitton//home/swhitton/.config/vcsh/repo.d/priv.git

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: unknown repository type and no defined update command for 
/home/swhitton//home/swhitton/.config/vcsh/repo.d/pub.git

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/.emacs.d
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/bin
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/etc
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/lib
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/src
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/texmf
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/tmp
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ mkdir -p ../tmp ../local/src ../local/bin ../mnt
 }; my_action <<

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/var
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr skip: running rcs test >>
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_git_bare_test() {

test -d "$MR_REPO"/refs/heads && test -d "$MR_REPO"/refs/tags &&
test -d "$MR_REPO"/objects && test -f "$MR_REPO"/config &&
test "`GIT_CONFIG="$MR_REPO"/config git config --get core.bare`" = true
}
my_fossil_test() {
test -f "$MR_REPO"/_FOSSIL_
}
my_darcs_test() {
test -d "$MR_REPO"/_darcs
}
my_vcsh_test() {
perl:
-d "$ENV{MR_REPO}/refs/heads" && -d "$ENV{MR_REPO}/refs/tags" &&
-d "$ENV{MR_REPO}/objects" && -f "$ENV{MR_REPO}/config" &&
`GIT_CONFIG="$ENV{MR_REPO}"/config git config --get vcsh.vcsh` =~ /true/
}
my_svn_test() {
test -d "$MR_REPO"/.svn
}
my_git_test() {
test -d "$MR_REPO"/.git
}
my_cvs_test() {
test -d "$MR_REPO"/CVS
}
my_bzr_test() {
test -d "$MR_REPO"/.bzr
}
my_hg_test() {
test -d "$MR_REPO"/.hg
}
set -e
if my_hg_test; then echo hg; fi
if my_bzr_test; then echo bzr; fi
if my_cvs_test; then echo cvs; fi
if my_git_test; then echo git; fi
if my_svn_test; then echo svn; fi
if my_vcsh_test; then echo vcsh; fi
if my_darcs_test; then echo darcs; fi
if my_fossil_test; then echo fossil; fi
if my_git_bare_test; then echo git_bare; fi
<<
sh: perl:: not found
sh: -d: not found
mr update: /home/swhitton//home/swhitton/doc/www/blog
mr update: running >>set -e; 
error() {
        echo "mr: $@" >&2
        exit 1
}
warning() {
        echo "mr (warning): $@" >&2
}
info() {
        echo "mr: $@" >&2
}
hours_since() {
        if [ -z "$1" ] || [ -z "$2" ]; then
                error "mr: usage: hours_since action num"
        fi
        for dir in .git .svn .bzr CVS .hg _darcs _FOSSIL_; do
                if [ -e "$MR_REPO/$dir" ]; then
                        flagfile="$MR_REPO/$dir/.mr_last$1"
                        break
                fi
        done
        if [ -z "$flagfile" ]; then
                error "cannot determine flag filename"
        fi
        delta=`perl -wle 'print -f shift() ? int((-M _) * 24) : 9999' 
"$flagfile"`
        if [ "$delta" -lt "$2" ]; then
                return 1
        else
                touch "$flagfile"
                return 0
        fi
}

my_action(){ git pull "$@"
 }; my_action <<
Already up-to-date.

mr update: finished (16 ok; 6 failed)
_______________________________________________
vcs-home mailing list
vcs-home@lists.madduck.net
http://lists.madduck.net/listinfo/vcs-home

Reply via email to