1 files changed, 29 insertions, 0 deletions
diff --git a/source/rvs-core/commit.d b/source/rvs-core/commit.d
new file mode 100755
index 0000000..5a47614
--- /dev/null
+++ b/source/rvs-core/commit.d
@@ -0,0 +1,29 @@
+#!$$SHELL$$
+# abomination module:rvs:commit:d
+name='rvs commit.d'
+ver='0.6.0'
+usage='[OPTIONS] DIRECTORY'
+# 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 "`rvs -d`/lib/stdio"
+source "`rvs -d`/lib/rvsdb"
+
+# commit.d DIRNAME
+dir="$1"
+
+tmp=`tempfile`
+loginit "$tmp"
+for file in $dir; do
+	hash=`commit "$dir/$file"`
+	echo "$file:$hash" >> "$tmp"
+done
+
+rvs commit.f "$tmp"
+rm "$tmp"
+