Edit

kc3-lang/automake/lib/Automake/Configure_ac.pm

Branch :

  • Show log

    Commit

  • Author : Alexandre Duret-Lutz
    Date : 2003-06-03 21:09:22
    Hash : 7be4b03a
    Message : * lib/Automake/Configure_ac.pm (search_configure_ac, find_configure_ac): Rename as ... (find_configure_ac, require_configure_ac): ... these. * aclocal.in (scan_configure): Adjust call to require_configure_ac. * automake.in (scan_autoconf_files): Likewise. Suggested by Tim Van Holder.

  • lib/Automake/Configure_ac.pm
  • # Copyright (C) 2003  Free Software Foundation, Inc.
    
    # This program is free software; you can redistribute it and/or modify
    # it under the terms of the GNU General Public License as published by
    # the Free Software Foundation; either version 2, or (at your option)
    # any later version.
    
    # This program is distributed in the hope that it will be useful,
    # but WITHOUT ANY WARRANTY; without even the implied warranty of
    # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    # GNU General Public License for more details.
    
    # You should have received a copy of the GNU General Public License
    # along with this program; if not, write to the Free Software
    # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    # 02111-1307, USA.
    
    package Automake::Configure_ac;
    
    use strict;
    use Exporter;
    use Automake::Channels;
    use Automake::ChannelDefs;
    
    use vars qw (@ISA @EXPORT);
    
    @ISA = qw (Exporter);
    @EXPORT = qw ($configure_ac &find_configure_ac &require_configure_ac);
    
    =head1 NAME
    
    Automake::Configure_ac - Locate configure.ac or configure.in.
    
    =head1 SYNOPSIS
    
      use Automake::Configure_ac;
    
      # Try to locate configure.in or configure.ac in the current
      # directory.  It may be absent.  Complain if both files exist.
      my $filename = find_configure_ac;
    
      # Likewise, but bomb out if the file does not exist.
      my $filename = require_configure_ac;
    
    In both cases, the name of the file found is also put in the
    C<$configure_ac> global variable.
    
    =cut
    
    use vars '$configure_ac';
    
    sub find_configure_ac ()
    {
      if (-f 'configure.ac')
        {
          if (-f 'configure.in')
    	{
    	  msg ('unsupported',
    	       "`configure.ac' and `configure.in' both present.\n"
    	       . "proceeding with `configure.ac'.");
    	}
          $configure_ac = 'configure.ac';
        }
      elsif (-f 'configure.in')
        {
          $configure_ac = 'configure.in';
        }
      return $configure_ac;
    }
    
    sub require_configure_ac ()
    {
      fatal "`configure.ac' or `configure.in' is required"
        unless find_configure_ac;
      return $configure_ac;
    }
    
    1;
    
    ### Setup "GNU" style for perl-mode and cperl-mode.
    ## Local Variables:
    ## perl-indent-level: 2
    ## perl-continued-statement-offset: 2
    ## perl-continued-brace-offset: 0
    ## perl-brace-offset: 0
    ## perl-brace-imaginary-offset: 0
    ## perl-label-offset: -2
    ## cperl-indent-level: 2
    ## cperl-brace-offset: 0
    ## cperl-continued-brace-offset: 0
    ## cperl-label-offset: -2
    ## cperl-extra-newline-before-brace: t
    ## cperl-merge-trailing-else: nil
    ## cperl-continued-statement-offset: 2
    ## End: