From f109b70f3edf073712ba3e8cba2374fe61c8e97e Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Fri, 8 Apr 1988 12:50:10 +0000
Subject: [PATCH] updated for 4th distribution

---
 distr/Action  |  3 +++
 distr/How_To  | 24 ++++++++++++++----------
 distr/dwalk   |  6 +++---
 distr/mkf     |  4 ++--
 distr/mktree  |  5 ++---
 distr/todistr |  2 +-
 6 files changed, 25 insertions(+), 19 deletions(-)

diff --git a/distr/Action b/distr/Action
index c50f46f93..13d5a20ac 100644
--- a/distr/Action
+++ b/distr/Action
@@ -1,3 +1,6 @@
+name "EM tables"
+dir etc
+end
 name "Installation manual"
 dir doc
 end
diff --git a/distr/How_To b/distr/How_To
index d4091190f..c057e23d5 100644
--- a/distr/How_To
+++ b/distr/How_To
@@ -4,7 +4,7 @@ The EM home directory contains a file called ".distr". It contains
 the names of all the files and directories you want to have in the distribution.
 The directories should contain .distr files, the other files should
 be placed under RCS.
-The current RCS revision name is "distr3".
+The current RCS revision name is "distr4".
 The are files that derive from other files and yet should be placed
 in the distribution.
 These files should not be placed under RCS.
@@ -13,24 +13,24 @@ these files.
 
 When all this is correct, use the shell script mktree the extract
 the distribution from the EM tree.
-	cd /usr/em ; sh distr/mktree destination_tree >distr/f.attf 2>&1
+	cd ~em/Repositories ; sh ../Work/distr/mktree destination_tree >../Work/distr/f.attf 2>&1
 Make sure that the destination tree exists and is empty!
 Failing to do that will almost certainly result in a welter of
 error messages.
 The file f.attf contains mktree error messages and should be compared
 to Exceptions.
 The actions of mktree are quite complicated. It starts in the current
-directory reading the ".distr" file, after copying that file to the
-destination tree.
+directory checking out the .distr file, and copying it to the destination
+directory
 For each file mentioned there it performes certain actions:
 1- Directory	Change to that directory and call yourself recursively.
 2- File
-   a-           Try to do "co -rdistr3 destination_tree/path/destination_file"
+   a-           Try to do "co -rdistr4 destination_tree/path/destination_file"
                 on succes "chmod +w destination_file" 
               else
    b-           Try to do "co destination_tree/destination_file"
                 on succes "chmod +w destination_file" and
-                give message that says "Missing distr3 entry" (or some such). 
+                give message that says "Missing distr4 entry" (or some such). 
               else
    c-           I   Does a file LIST exist in this directory AND
                     is the first line of LIST equal to the name of the
@@ -58,13 +58,13 @@ to look like the tree you need.
 There are too many files there though, especially the files created by
 the derivation process.
 That is why we now give the command:
-	dtar cdf distr3 .
-The file distr3 is the one you should put on tape!
+	dtar cdf distr4 .
+The file distr4 is the one you should put on tape!
 But,.... before doing that: Try it out!
 Repeat the process described in the installation manual.
 Only if that succeeds you are sure that you included the files needed,
-and gave all other files the correct "distr3" RCS id.
-After you sent the tape away, forbid ANYBODY to touch the distr3 id
+and gave all other files the correct "distr4" RCS id.
+After you sent the tape away, forbid ANYBODY to touch the distr4 id
 in your RCS files.
 					Good Luck,
 						Ed Keizer, 85/4/15.
@@ -72,3 +72,7 @@ in your RCS files.
 Updated for 3rd distribution by Ceriel Jacobs, 87/3/11.
 And again,
 					Good Luck!
+
+Updated for 4rd distribution by Ceriel Jacobs, 88/4/08.
+And again,
+					Good Luck!
diff --git a/distr/dwalk b/distr/dwalk
index ec9cc3af0..60a1485f6 100755
--- a/distr/dwalk
+++ b/distr/dwalk
@@ -1,11 +1,11 @@
 : ${CDIR=.}
-if test ! -r .distr
+${DF-:} $CDIR .distr
+if test ! -r $DESTDIR/$CDIR/.distr
 then
 	echo ++ no .distr in $CDIR
         exit 0
 fi
-${DS-:} $CDIR
-for i in `cat .distr`
+for i in `cat $DESTDIR/$CDIR/.distr`
 do
         if test -d $i
         then
diff --git a/distr/mkf b/distr/mkf
index 2d8faace3..ef1a02531 100755
--- a/distr/mkf
+++ b/distr/mkf
@@ -1,10 +1,10 @@
-if co -q -rdistr3 $DESTDIR/$1/$2 >/dev/null 2>&1
+if co -q -rdistr4 $DESTDIR/$1/$2 >/dev/null 2>&1
 then
 	chmod +w $DESTDIR/$1/$2
 elif co -q $DESTDIR/$1/$2 >/dev/null 2>&1
 then
 	chmod +w $DESTDIR/$1/$2
-	echo -- $1/$2 no distr3 yet
+	echo -- $1/$2 no distr4 yet
 elif grep LIST .distr >/dev/null 2>&1 &&
      (test "$2" = "`head -1 $DESTDIR/$1/LIST`") >/dev/null 2>&1 &&
      ${DA-false} "$1" "$2"
diff --git a/distr/mktree b/distr/mktree
index 56fbcffa2..21128f648 100644
--- a/distr/mktree
+++ b/distr/mktree
@@ -2,14 +2,13 @@ case $# in
 1)	;;
 *)	echo $0 directory ; exit 1 ;;
 esac
-DDIR=/proj/em/distr
+DDIR=/proj/em/Work/distr
 case $1 in
 /*)	DESTDIR=$1 ;;
 *)	DESTDIR=`pwd`/$1 ;;
 esac
-DS=$DDIR/mks
 DD=$DDIR/mkd
 DF=$DDIR/mkf
 DA=$DDIR/mka
-export DESTDIR DS DD DF DA
+export DESTDIR DD DF DA
 $DDIR/dwalk
diff --git a/distr/todistr b/distr/todistr
index e1bfb5d6b..5b171453b 100644
--- a/distr/todistr
+++ b/distr/todistr
@@ -23,4 +23,4 @@ esac
 case x$REV in
 x)	exit 2 ;;
 esac
-rcs -ndistr3:$REV $FLAGS $FILE
+rcs -ndistr4:$REV $FLAGS $FILE
-- 
2.34.1