#!$$SHELL$$
# abomination module:rvs:commit:f
name='rvs commit.f'
ver='0.6.3'
usage='[OPTIONS] FILE'
# Copyright (C) 2009 Luke Shumaker
# 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.
# 
# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.

source "$RVSDIR/lib/stdio"
source "$RVSDIR/lib/rvsdb"

# commit.f FILENAME
file="$1"

hash=`getid $file`
if [ ! -f "`rvs repo`/files/$hash" ]; then
	#cp "$file" "`rvs repo`/files/$hash"
	install -m 644 -o $USER -g $USER -T "$file" "`rvs repo`/files/$hash"
fi
echo "$hash"