Changeset 6436

Timestamp:

Feb 16, 2006, 2:28:56 PM (20 years ago)

Author:

jhoblitt

Message:

require template dirs to have a config.pl file describing the template file output paths

File:

• trunk/glueforge/glueforge.in (modified) (2 diffs)

trunk/glueforge/glueforge.in

@@ -3 +3 @@
 # Copyright (C) 2005-2006  Joshua Hoblitt
 #
-# $Id: glueforge.in,v 1.42 2006-01-11 02:39:16 jhoblitt Exp $
+# $Id: glueforge.in,v 1.43 2006-02-17 00:28:56 jhoblitt Exp $
 
 use strict;
@@ -50 +50 @@
 $output = $data->{pkg_name} unless defined $output;
 
-my %tt = (
-    'autogen_sh.tt'         => "$output/autogen.sh",
-    'configure_ac.tt'       => "$output/configure.ac",
-    'pkgconfig_pc_in.tt'    => "$output/$data->{pkg_name}.pc.in",
-    'doxyfile_in.tt'        => "$output/Doxyfile.in",
-    'top_makefile_am.tt'    => "$output/Makefile.am",
-    'src_makefile_am.tt'    => "$output/src/Makefile.am",
-    'header.tt'             => "$output/src/$data->{pkg_name}.h",
-    'code.tt'               => "$output/src/$data->{pkg_name}.c",
-    'tests_makefile_am.tt'  => "$output/tests/Makefile.am",
-    'testsuite_at.tt'       => "$output/tests/testsuite.at",
-    'dbsetup_c.tt'          => "$output/tests/dbsetup.c",
-    'dbcleanup_c.tt'        => "$output/tests/dbcleanup.c",
-    'alloc_c.tt'            => "$output/tests/alloc.c",
-    'init_c.tt'             => "$output/tests/init.c",
-    'cleanup_c.tt'          => "$output/tests/cleanup.c",
-    'createtable_c.tt'      => "$output/tests/createtable.c",
-    'droptable_c.tt'        => "$output/tests/droptable.c",
-    'insert_c.tt'           => "$output/tests/insert.c",
-    'pop_c.tt'              => "$output/tests/pop.c",
-    'insertobject_c.tt'     => "$output/tests/insertobject.c",
-    'popobject_c.tt'        => "$output/tests/popobject.c",
-    'insertfits_c.tt'       => "$output/tests/insertfits.c",
-    'popfits_c.tt'          => "$output/tests/popfits.c",
-    'selectrowsfits_c.tt'   => "$output/tests/selectrowsfits.c",
-    'metadatafromobject_c.tt' => "$output/tests/metadatafromobject.c",
-    'objectfrommetadata_c.tt' => "$output/tests/objectfrommetadata.c",
-);
+my %tt;
+{
+    # slurp config.pl
+    open(my $fh, "$template/config.pl")
+        or die "can't open $template/config.pl: $!";
+    my $ttconfig = do {local $/; <$fh>};
+    close($fh) or die "can't close $template/config.pl: $!";
+}
+
+# configure template file paths
+eval $ttconfig;
+die "can't eval contents of $template/config.pl: $@" if $@;
 
 my $mangler = Template->new({ INCLUDE_PATH => $template });