X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;ds=inline;f=free%2Flibs%2Fexamples%2Finternal%2Fconfigure;h=d914789a288635840adda6253b2eeb6e8cdf84a3;hb=804b539f2f9d9af87ffa7036fd2b181fb12d86f1;hp=1e93b7eabdff0c36ef762516df2b983c07c028ff;hpb=6653d0a752dd937152fa66f1725fab42edc25b8a;p=libucw.git

diff --git a/free/libs/examples/internal/configure b/free/libs/examples/internal/configure
index 1e93b7ea..d914789a 100755
--- a/free/libs/examples/internal/configure
+++ b/free/libs/examples/internal/configure
@@ -14,18 +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/autoconf.cfg";
+require UCW::Configure::Paths;
+require UCW::Configure::C;
+require UCW::Configure::LibUCW;
 Finish();
 
 Log "\nConfigured, run `make' to build everything.\n";