#!/bin/sh
name='rvs files commit'
ver=0.9
#  Copyright (C) 2009 Luke Shumaker
#  
#  This program is free software; you can redistribute it and/or
#  modify it under the terms of the GNU General Public License as
#  published by the Free Software Foundation; either version 2 of the
#  License, or (at your option) any later version.
#  
#  This program is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
#  General Public License for more details.
#  
#  You should have received a copy of the GNU General Public License
#  along with this program;  see the file COPYING.
#  If not, see <http://www.gnu.org/licenses>.

source "$libexecdir/@ID@/stdio"

# commit FILE
file=${1-.}

if [ ! -e $file ]; then error "file \`$file' does not exist";
# START file type list
elif [ -L $file ]; then type='l';	# symbolic link
elif [ -b $file ]; then type='b';	# block       (buffered) special
elif [ -c $file ]; then type='c';	# character (unbuffered) special
elif [ -d $file ]; then type='d';	# directory
elif [ -p $file ]; then type='p';	# named pipe (FIFO)
elif [ -f $file ]; then type='f';	# regular file
elif [ -s $file ]; then type='s';	# socket
#elif [ -D $file ]; then type='D';	# door (Solaris only)
# END   file type list
else error "could not identify file type of \`$file'"
fi

out "+$type `pwd`/$file"
"$RVS" commit.$type "$file"