2001-05-23 Alexandre Duret-Lutz <duret_g@epita.fr>

	* automake.in (handle_languages, handle_single_transform_list): Use
	language '' for unknown extensions.
	(derive_suffix): Check whether $extension_map{$source_ext}
	is undefined, not empty.

diff --git a/ChangeLog b/ChangeLog
index 8b14ed962d24a4422cb074af20ced6b7d9ae993b..8ce5887eb564b1c4f4bae08db348db09839393b3 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2001-05-23  Alexandre Duret-Lutz  <duret_g@epita.fr>
+
+       * automake.in (handle_languages, handle_single_transform_list): Use
+       language '' for unknown extensions.
+       (derive_suffix): Check whether $extension_map{$source_ext}
+       is undefined, not empty.
+
 2001-05-23  Alexandre Duret-Lutz  <duret_g@epita.fr>
 
        * automake.in (read_am_file): Ignore trailing backslash on

diff --git a/automake.in b/automake.in
index 872aae0b5732571650c013fca54d9086c260e107..c6e17bc874dad6f254d08f79bde6b7d1f3e7ecbd 100755 (executable)
--- a/automake.in
+++ b/automake.in
@@ -1498,6 +1498,8 @@ sub handle_languages
     my $needs_c = 0;
     foreach my $ext (sort keys %extension_seen)
       {
+       next unless $extension_map{$ext};
+
        my $lang = $languages{$extension_map{$ext}};
 
        # Get information on $LANG.
@@ -5189,7 +5191,7 @@ sub derive_suffix
 
     # FIXME: hard-coding `o' is a mistake.  Doing something
     # intelligent is harder.
-    while ($extension_map{$source_ext} eq ''
+    while (! $extension_map{$source_ext}
           && $source_ext ne 'o'
           && defined $suffix_rules{$source_ext})
     {