todistr 427 B

1234567891011121314151617181920212223242526
  1. REV=
  2. FILE=
  3. while :
  4. do
  5. case $# in
  6. 0) break ;;
  7. esac
  8. ARG="$1"
  9. shift
  10. case "$ARG" in
  11. -r*) REV=`echo "$ARG"| sed s/-r//` ;;
  12. -*) FLAGS="$FLAGS $ARG" ;;
  13. *) case x$FILE in
  14. x) FILE="$ARG" ;;
  15. *) echo todistr can only be done on one file at the time
  16. exit 1 ;;
  17. esac
  18. esac
  19. done
  20. case x$REV in
  21. x) REV=`rlog -h "$FILE"|sed -n -e '/head/s/^head:[ ]*//p'` ;;
  22. esac
  23. case x$REV in
  24. x) exit 2 ;;
  25. esac
  26. rcs -ndistr4:$REV $FLAGS $FILE