diff --git a/scripts/scm.sh b/scripts/scm.sh
index 89333847..1b965358 100644
--- a/scripts/scm.sh
+++ b/scripts/scm.sh
@@ -42,6 +42,27 @@ cmd_rm()
 	esac
 }
 
+cmd_clean()
+{
+	case $scm in
+	cvs)
+		while [ "${1:0:1}" = - ]; do
+			shift
+		done
+		set +e
+		local file
+		for file in $@; do
+			if ! grep -q "/$file/" CVS/Entries; then
+				rm -f $file
+			fi
+		done
+		;;
+	git)
+		git clean "$@"
+		;;
+	esac
+}
+
 # ------- here we go
 myname=`basename $0`
 cmd=cmd_$1