Index: compat/date.in
===================================================================
RCS file: /sources/quilt/quilt/compat/date.in,v
retrieving revision 1.1
diff -u -r1.1 date.in
--- compat/date.in	1 Feb 2006 12:28:29 -0000	1.1
+++ compat/date.in	1 Feb 2006 14:27:45 -0000
@@ -8,7 +8,7 @@
 
 use strict;
 use POSIX qw(strftime);
-use Getopt::Long;
+use Getopt::Long qw(:config gnu_getopt prefix_pattern=(--|-));
 use Date::Parse;
 
 my $spec = '%a %b %e %H:%M:%S %Z %Y';
@@ -41,8 +41,6 @@
     }
 }
 
-Getopt::Long::Configure("gnu_getopt");
-
 GetOptions('rfc-822|R' => sub() { $spec = '%a, %d %b %Y %H:%M:%S %z' },
 	   'utc|universal|u' => \$utc,
 	   'date|d=s' => sub() { $now = parse_utc_secs($_[1]) },