Index: gap-atlasrep-2.1.0/init.g
===================================================================
--- gap-atlasrep-2.1.0.orig/init.g
+++ gap-atlasrep-2.1.0/init.g
@@ -5,6 +5,24 @@
 #Y  Copyright (C)  2001,   Lehrstuhl D für Mathematik,  RWTH Aachen,  Germany
 ##
 
+if UserPreference( "AtlasRep", "AtlasRepDataDirectory") = fail then
+  CallAndInstallPostRestore(function()
+    Perform(["datagens", "dataword"], function(dirname)
+      local package, l, dir;
+      package := "AtlasRep";
+      dir := GAPInfo.UserGapRoot;
+      for l in ["","pkg",package,dirname] do
+        dir := Concatenation([dir,"/",l]);
+        if not IsDirectoryPath(dir) then
+          CreateDir(dir);
+        fi;
+      od;
+      return 0;
+    end);
+    SetUserPreference( "AtlasRep", "AtlasRepDataDirectory",Concatenation(GAPInfo.UserGapRoot,"/pkg/AtlasRep/"));
+  end);
+fi;
+
 # Read the declaration part.
 ReadPackage( "atlasrep", "gap/userpref.g"  );
 ReadPackage( "atlasrep", "gap/bbox.gd"     );
