automake-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

FYI: 3/ use plain strict


From: Alexandre Duret-Lutz
Subject: FYI: 3/ use plain strict
Date: Fri, 23 May 2003 23:09:13 +0200
User-agent: Gnus/5.090016 (Oort Gnus v0.16) Emacs/21.3 (gnu/linux)

I'm checking this in.

2003-05-23  Alexandre Duret-Lutz  <address@hidden>

        * automake.in: Use plain strict, including refs.
        (macro_define, handle_single_transform_list): Use \&{'name'} to
        build references to named subroutines.

Index: automake.in
===================================================================
RCS file: /cvs/automake/automake/automake.in,v
retrieving revision 1.1458
diff -u -r1.1458 automake.in
--- automake.in 22 May 2003 17:50:10 -0000      1.1458
+++ automake.in 23 May 2003 21:06:39 -0000
@@ -120,7 +120,7 @@
 
 package Automake;
 
-use strict 'vars', 'subs';
+use strict;
 use Automake::General;
 use Automake::XFile;
 use Automake::Channels;
@@ -2089,9 +2089,9 @@
             # should be applied.  This means this particular language
             # generates another source file which we must then process
             # further.
-            my $subr = 'lang_' . $lang->name . '_rewrite';
+            my $subr = \&{'lang_' . $lang->name . '_rewrite'};
             my ($r, $source_extension)
-               = & $subr ($directory, $base, $extension);
+               = &$subr ($directory, $base, $extension);
             # Skip this entry if we were asked not to process it.
             next if $r == LANG_IGNORE;
 
@@ -6245,7 +6245,7 @@
   # This hook helps to update some internal state *while*
   # parsing the file.  For instance the handling of SUFFIXES
   # requires this (see var_SUFFIXES_trigger).
-  my $var_trigger = "var_${var}_trigger";
+  my $var_trigger = \&{"var_${var}_trigger"};
   &$var_trigger($type, $value) if defined &$var_trigger;
 }
 

-- 
Alexandre Duret-Lutz





reply via email to

[Prev in Thread] Current Thread [Next in Thread]