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

diff --git a/free/libs/examples/internal/configure b/free/libs/examples/internal/configure
index 034d43d6..d914789a 100755
--- a/free/libs/examples/internal/configure
+++ b/free/libs/examples/internal/configure
@@ -14,20 +14,21 @@ BEGIN {
 		} elsif ($0 =~ m@^(.*)/configure$@ && -f "$1/$pkgfile") {
 			$srcdir=$1;
 		} else {
-			die "Don't know how to find myself. Please set SRCDIR manually.";
+			die "Don't know how to find myself. Please set SRCDIR manually.\n";
 		}
 	}
-	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";