pm: do not quote `like this', as per GCS recommendation

This patch converts the internal perl modules used by automake and
aclocal to the use of new quoting format 'like this' or "like this"
rather than `like this'.

* lib/Automake/ChannelDefs.pm, lib/Automake/Channels.pm,
lib/Automake/Condition.pm, lib/Automake/Configure_ac.pm,
lib/Automake/DisjConditions.pm, lib/Automake/FileUtils.pm,
lib/Automake/General.pm, lib/Automake/Item.pm,
lib/Automake/Rule.pm, lib/Automake/Getopt.pm,
lib/Automake/Options.pm, lib/Automake/Struct.pm,
lib/Automake/VarDef.pm, lib/Automake/Variable.pm,
lib/Automake/Version.pm, lib/Automake/XFile.pm: Update and
adjust quoting format throughout, in comments and diagnostic.
Some minor related rewordings and reformatting since we are
at it.

1 files changed, 32 insertions, 32 deletions

diff --git a/lib/Automake/Variable.pm b/lib/Automake/Variable.pm
index fdf6ba21b..f9ed7dae4 100644
--- a/lib/Automake/Variable.pm
+++ b/lib/Automake/Variable.pm
@@ -139,7 +139,7 @@ my @_var_order;
 
 # This keeps track of all variables defined by &_gen_varname.
 # $_gen_varname{$base} is a hash for all variables defined with
-# prefix `$base'.  Values stored in this hash are the variable names.
+# prefix '$base'.  Values stored in this hash are the variable names.
 # Keys have the form "(COND1)VAL1(COND2)VAL2..." where VAL1 and VAL2
 # are the values of the variable for condition COND1 and COND2.
 my %_gen_varname = ();
@@ -470,7 +470,7 @@ sub _check_ambiguous_condition ($$$)
   if ($message && $def->pretty != VAR_SILENT)
     {
       msg 'syntax', $where, "$message ...", partial => 1;
-      msg_var ('syntax', $var, "... `$var' previously defined here");
+      msg_var ('syntax', $var, "... '$var' previously defined here");
       verb ($self->dump);
     }
 }
@@ -524,7 +524,7 @@ sub output ($@)
   foreach my $cond (@conds)
     {
       my $def = $self->def ($cond);
-      prog_error ("unknown condition `" . $cond->human . "' for `"
+      prog_error ("unknown condition '" . $cond->human . "' for '"
 		  . $self->name . "'")
 	unless $def;
 
@@ -672,8 +672,8 @@ sub has_conditional_contents ($)
 
   # Traverse the variable recursively until we
   # find a variable defined conditionally.
-  # Use `die' to abort the traversal, and pass it `$full_cond'
-  # to we can find easily whether the `eval' block aborted
+  # Use 'die' to abort the traversal, and pass it '$full_cond'
+  # to we can find easily whether the 'eval' block aborted
   # because we found a condition, or for some other error.
   eval
     {
@@ -744,7 +744,7 @@ sub scan_variable_expansions ($)
     {
       my $var = $1 || $2;
       # The occurrence may look like $(string1[:subst1=[subst2]]) but
-      # we want only `string1'.
+      # we want only 'string1'.
       $var =~ s/:[^:=]*=[^=]*$//;
       push @result, $var;
     }
@@ -841,14 +841,14 @@ sub define ($$$$$$$$)
 			       || $pretty == VAR_SILENT
 			       || $pretty == VAR_SORTED);
 
-  error $where, "bad characters in variable name `$var'"
+  error $where, "bad characters in variable name '$var'"
     if $var !~ /$_VARIABLE_PATTERN/o;
 
-  # `:='-style assignments are not acknowledged by POSIX.  Moreover it
+  # ':='-style assignments are not acknowledged by POSIX.  Moreover it
   # has multiple meanings.  In GNU make or BSD make it means "assign
   # with immediate expansion", while in OSF make it is used for
   # conditional assignments.
-  msg ('portability', $where, "`:='-style assignments are not portable")
+  msg ('portability', $where, "':='-style assignments are not portable")
     if $type eq ':';
 
   check_variable_expansions ($value, $where);
@@ -877,9 +877,9 @@ sub define ($$$$$$$$)
       if ($def->type ne $type && $def->owner == VAR_AUTOMAKE)
 	{
 	  error ($def->location,
-		 "Automake variable `$var' was set with `"
+		 "Automake variable '$var' was set with '"
 		 . $def->type . "=' here ...", partial => 1);
-	  error ($where, "... and is now set with `$type=' here.");
+	  error ($where, "... and is now set with '$type=' here.");
 	  prog_error ("Automake variable assignments should be consistently\n"
 		      . "defined with the same sign");
 	}
@@ -891,15 +891,15 @@ sub define ($$$$$$$$)
 	  if (! exists $_silent_variable_override{$var})
 	    {
 	      my $condmsg = ($cond == TRUE
-			     ? '' : (" in condition `" . $cond->human . "'"));
+			     ? '' : (" in condition '" . $cond->human . "'"));
 	      msg_cond_var ('override', $cond, $var,
-			    "user variable `$var' defined here$condmsg ...",
+			    "user variable '$var' defined here$condmsg ...",
 			    partial => 1);
 	      msg ('override', $where,
-		   "... overrides Automake variable `$var' defined here");
+		   "... overrides Automake variable '$var' defined here");
 	    }
 	  verb ("refusing to override the user definition of:\n"
-		. $self->dump ."with `" . $cond->human . "' => `$value'");
+		. $self->dump ."with '" . $cond->human . "' => '$value'");
 	  return;
 	}
     }
@@ -988,16 +988,16 @@ sub define ($$$$$$$$)
 	  #   endif
 	  #   X += Z
 	  # should be rejected because X is not defined for all conditions
-	  # where `+=' applies.
+	  # where '+=' applies.
 	  my $undef_cond = $self->not_always_defined_in_cond ($cond);
 	  if (! $undef_cond->false)
 	    {
 	      error ($where,
-		     "cannot apply `+=' because `$var' is not defined "
+		     "cannot apply '+=' because '$var' is not defined "
 		     . "in\nthe following conditions:\n  "
 		     . join ("\n  ", map { $_->human } $undef_cond->conds)
-		     . "\neither define `$var' in these conditions,"
-		     . " or use\n`+=' in the same conditions as"
+		     . "\neither define '$var' in these conditions,"
+		     . " or use\n'+=' in the same conditions as"
 		     . " the definitions.");
 	    }
 	  else
@@ -1024,7 +1024,7 @@ sub define ($$$$$$$$)
 	if ! $new_var && $owner < $def->owner;
 
       # Assignments to a macro set its location.  We don't adjust
-      # locations for `+='.  Ideally I suppose we would associate
+      # locations for '+='.  Ideally I suppose we would associate
       # line numbers with random bits of text.
       $def = new Automake::VarDef ($var, $value, $comment, $where->clone,
 				   $type, $owner, $pretty);
@@ -1139,7 +1139,7 @@ sub require_variables ($$$@)
       next VARIABLE
 	if vardef ($var, $cond);
 
-      my $text = "$reason`$var' is undefined\n";
+      my $text = "$reason'$var' is undefined\n";
       my $v = var $var;
       if ($v)
 	{
@@ -1156,20 +1156,20 @@ sub require_variables ($$$@)
       if (exists $_am_macro_for_var{$var})
 	{
 	  my $mac = $_am_macro_for_var{$var};
-	  $text .= "  The usual way to define `$var' is to add "
-	    . "`$mac'\n  to `$configure_ac' and run `aclocal' and "
-	    . "`autoconf' again.";
+	  $text .= "  The usual way to define '$var' is to add "
+	    . "'$mac'\n  to '$configure_ac' and run 'aclocal' and "
+	    . "'autoconf' again.";
 	  # aclocal will not warn about undefined macros unless it
 	  # starts with AM_.
-	  $text .= "\n  If `$mac' is in `$configure_ac', make sure\n"
+	  $text .= "\n  If '$mac' is in '$configure_ac', make sure\n"
 	    . "  its definition is in aclocal's search path."
 	    unless $mac =~ /^AM_/;
 	}
       elsif (exists $_ac_macro_for_var{$var})
 	{
-	  $text .= "  The usual way to define `$var' is to add "
-	    . "`$_ac_macro_for_var{$var}'\n  to `$configure_ac' and "
-	    . "run `autoconf' again.";
+	  $text .= "  The usual way to define '$var' is to add "
+	    . "'$_ac_macro_for_var{$var}'\n  to '$configure_ac' and "
+	    . "run 'autoconf' again.";
 	}
 
       error $where, $text, uniq_scope => US_GLOBAL;
@@ -1311,7 +1311,7 @@ recursive calls).
 
 =cut
 
-# Contains a stack of `from' and `to' parts of variable
+# Contains a stack of 'from' and 'to' parts of variable
 # substitutions currently in force.
 my @_substfroms;
 my @_substtos;
@@ -1340,7 +1340,7 @@ sub _do_recursive_traversal ($$&&$$$$)
 
   if ($var->{'scanned'} == $_traversal)
     {
-      err_var $var, "variable `" . $var->name() . "' recursively defined";
+      err_var $var, "variable '" . $var->name() . "' recursively defined";
       return ();
     }
   $var->{'scanned'} = $_traversal;
@@ -1369,7 +1369,7 @@ sub _do_recursive_traversal ($$&&$$$$)
 	  my $val = shift @to_process;
 	  # If $val is a variable (i.e. ${foo} or $(bar), not a filename),
 	  # handle the sub variable recursively.
-	  # (Backslashes before `}' and `)' within brackets are here to
+	  # (Backslashes before '}' and ')' within brackets are here to
 	  # please Emacs's indentation.)
 	  if ($val =~ /^\$\{([^\}]*)\}$/ || $val =~ /^\$\(([^\)]*)\)$/)
 	    {
@@ -1411,7 +1411,7 @@ sub _do_recursive_traversal ($$&&$$$$)
 	      next;
 	    }
 	  # Try to expand variable references inside filenames such as
-	  # `$(NAME).txt'.  We do not handle `:.foo=.bar'
+	  # '$(NAME).txt'.  We do not handle ':.foo=.bar'
 	  # substitutions, but it would make little sense to use this
 	  # here anyway.
 	  elsif ($inner_expand