Initial revision

diff --git a/distr/todistr b/distr/todistr
new file mode 100644 (file)
index 0000000..d452233
--- /dev/null
+++ b/distr/todistr
@@ -0,0 +1,24 @@
+REV=
+FILE=
+while :
+do
+       case $# in
+       0)      break ;;
+       esac
+       ARG="$1"
+       shift
+       case "$ARG" in
+       -r*)    REV=`echo "$ARG"| sed s/-r//` ;;
+       -*)     FLAGS=$FLAGS $ARG ;;
+       *)      case x$FILE in
+               x)      FILE="$ARG" ;;
+               *)      echo todistr can only be done on one file at the time
+                       exit 1 ;;
+               esac
+       esac
+done
+set -e
+case x$REV in
+x)     REV=`rlog -h "$FILE"|sed -n -e '/head/s/^head:[         ]*//'` ;;
+esac
+rcs -ndistr2:$REV $FLAGS $FILE