faubackup/src faubackup.in,1.9,1.10

Martin Waitz <[email protected]> Sun, 18 Apr 2004 23:04:57 +0000
Newsgroups gmane.comp.sysutils.backup.faubackup.cvs
Message-ID <[email protected]>
Update of /cvsroot/faubackup/faubackup/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27281/src

Modified Files:
	faubackup.in 
Log Message:
use some more Getopt features.
everybody should have a reasonably up-to-date perl available


Index: faubackup.in
===================================================================
RCS file: /cvsroot/faubackup/faubackup/src/faubackup.in,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** faubackup.in	18 Apr 2004 22:59:44 -0000	1.9
--- faubackup.in	18 Apr 2004 23:04:54 -0000	1.10
***************
*** 353,363 ****
  
  
! # Configure and "...+" entries doesn't work in perl5.004 :(
! #Getopt::Long::Configure( qw(bundling) );
  GetOptions(	"help|h|?" => \$show_help,
  		"usage" => \$show_usage,
  		"version" => \$show_version,
! #		"verbose|v+" => \$verbose,
! 		"verbose|v" => \$verbose,
  		"debuglevel=i" => \$verbose,
  		"ignore=s@" => \@ignore,
--- 353,361 ----
  
  
! Getopt::Long::Configure( qw(bundling) );
  GetOptions(	"help|h|?" => \$show_help,
  		"usage" => \$show_usage,
  		"version" => \$show_version,
! 		"verbose|v+" => \$verbose,
  		"debuglevel=i" => \$verbose,
  		"ignore=s@" => \@ignore,



-------------------------------------------------------
This SF.Net email is sponsored by: IBM Linux Tutorials
Free Linux tutorial presented by Daniel Robbins, President and CEO of
GenToo technologies. Learn everything from fundamentals to system
administration.http://ads.osdn.com/?ad_id=1470&alloc_id=3638&op=click