X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=free%2Flibs%2Fexamples%2Finternal%2Fconfigure;h=32d61781ebc04cbb3e43fb1a253361da779ed173;hb=daa0dfe6a351a3fada31f173ce0c0523bacb2740;hp=6f4a678d757d57c71a709f3ba350e1b5c41295b3;hpb=89f86d97def2a365b1799f70e3f254264b9c7615;p=libucw.git

diff --git a/free/libs/examples/internal/configure b/free/libs/examples/internal/configure
index 6f4a678d..32d61781 100755
--- a/free/libs/examples/internal/configure
+++ b/free/libs/examples/internal/configure
@@ -17,17 +17,18 @@ BEGIN {
 			die "Don't know how to find myself. Please set SRCDIR manually.";
 		}
 	}
-	require "$srcdir/ucw/perl/UCW/Configure.pm";
-	UCW::Configure::import UCW::Configure;
 }
 
+use lib "$srcdir/ucw/perl/";
+use UCW::Configure;
+
 Init($srcdir, "default.cfg");
 Include "ucw/default.cfg";
 Log "### Configuring TestApp ###\n\n";
 Include Get("CONFIG");
-Include "ucw/paths.cfg";
-Include "ucw/autoconf.cfg";
-Include "ucw/ucw.cfg";
+require UCW::Configure::Paths;
+require UCW::Configure::C;
+require UCW::Configure::LibUCW;
 Finish();
 
 Log "\nConfigured, run `make' to build everything.\n";