X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=free%2Flibs%2Fexamples%2Finternal%2Fconfigure;h=32d61781ebc04cbb3e43fb1a253361da779ed173;hb=d779d07989bb0188c7d03d0dec4714d087e2fe8c;hp=034d43d62d020c47ad30caa74c008eab4058a269;hpb=09e7fe5641b94148d998a1b620bf694f353cb17b;p=libucw.git

diff --git a/free/libs/examples/internal/configure b/free/libs/examples/internal/configure
index 034d43d6..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/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";