# HG changeset patch
# User Gerald Klix (speedy) <Gerald.Klix@klix.ch>
# Date 1723914604 -7200
#      Sat Aug 17 19:10:04 2024 +0200
# Branch Cuis7.0based
# Node ID 3fca7389c7a98c3feaee3f996094c52736a197b0
# Parent  649e8d84874d722f651ecb8898e3c6d485ad29c2
SUM: Added a simple bootstrap preparation script.

diff --git a/HaverPackageSearchPath.txt b/HaverPackageSearchPath.txt
deleted file mode 100644
--- a/HaverPackageSearchPath.txt
+++ /dev/null
@@ -1,3 +0,0 @@
-/
-/home/bear/gitwork/Cuis-Smalltalk/Cuis7-0/Packages
-/home/bear/gitwork/Cuis-Smalltalk/Cuis-Smalltalk-Dev/CompatibilityPackages
diff --git a/HaverVersionNumber.txt b/HaverVersionNumber.txt
new file mode 100644
--- /dev/null
+++ b/HaverVersionNumber.txt
@@ -0,0 +1,1 @@
+3
diff --git a/Haverize.st b/Haverize.st
--- a/Haverize.st
+++ b/Haverize.st
@@ -1,7 +1,12 @@
 | haverVersion |
-haverVersion := 1.
+haverVersion :=
+    (DirectoryEntry currentDirectory // 'HaverVersionNumber.txt')
+        readStream nextNumber.
 
-Feature require: (DirectoryEntry currentDirectory / 'HaverOnCuis' / 'haver' // 'Haverize.pck.st' :: pathName).
+Feature 
+    require:
+        (DirectoryEntry currentDirectory / 'haver' // 'Haverize.pck.st' :: pathName).
+
 HaverizePackage
     haverVersion: haverVersion;
     saveAsNewHaverVersionWhenIntegrating
diff --git a/prepareBootstrap.sh b/prepareBootstrap.sh
new file mode 100755
--- /dev/null
+++ b/prepareBootstrap.sh
@@ -0,0 +1,45 @@
+#!/bin/sh
+
+if [ "#" = "#$1" ];
+    then
+         echo 'usage: '$(basename $0) '<Cuis Directory>';
+         exit 1
+    else 
+        PROJECT_DIR=$(dirname $0)
+        CUIS_DIR=$1
+        if [ -d $CUIS_DIR ];
+            then
+                CUIS_7_DIR="$CUIS_DIR/Cuis7-0"
+                if [ -d $CUIS_7_DIR ];
+                    then
+                        CORE_UPDATES_DIR="$CUIS_7_DIR/CoreUpdates"
+                        if [ -d $CORE_UPDATES_DIR ];
+                            then
+                                echo "Core Updates OK\t\t($CORE_UPDATES_DIR)"
+                            else
+                                echo "error: The core updates directory ($CORE_UPDATES_DIR) is not a directory'"
+                                exit 1
+                         fi
+                        TRUE_TYPE_FONTS_DIR="$CUIS_7_DIR/TrueTypeFonts"
+                        if [ -d $TRUE_TYPE_FONTS_DIR ];
+                            then
+                                echo "TrueType Fonts OK\t($TRUE_TYPE_FONTS_DIR)"
+                            else
+                                echo "error: The true type fonts directory ($TRUE_TYPE_FONTS_DIR) is not a directory'"
+                                exit 1
+                         fi
+                         ln -fs $CORE_UPDATES_DIR $PROJECT_DIR
+                         ln -fs $TRUE_TYPE_FONTS_DIR $PROJECT_DIR
+                         cp -a $CUIS_7_DIR/CuisImage/Cuis7.0.* .
+                         echo "/" > HaverPackageSearchPath.txt
+                         echo "$CUIS_7_DIR/Packages" >> HaverPackageSearchPath.txt
+                         echo "$CUIS_DIR/Cuis-Smalltalk-Dev/CompatibilityPackages" >> HaverPackageSearchPath.txt
+                    else
+                        echo "error: The Cuis 7.0 directory ($CUIS_7_DIR) is not a directory'"
+                        exit 1
+                fi
+            else
+                echo "error: The Cuis top level directory ($CUIS_DIR) is not a directory'"
+                exit 1
+        fi
+fi