commit 8dedbf857a6dfd93c538c7f6d22eafdf44e01fc4
Author: Jitka Plesnikova <jplesnik@xxxxxxxxxx>
Date: Wed May 30 08:56:10 2012 +0200
Fix find2perl to translate ? glob properly
...ind2perl-transtate-question-mark-properly.patch | 13 +++++++++++++
1 files changed, 13 insertions(+), 0 deletions(-)
---
diff --git a/perl-5.14.2-find2perl-transtate-question-mark-properly.patch b/perl-5.14.2-find2perl-transtate-question-mark-properly.patch
new file mode 100644
index 0000000..e81be8d
--- /dev/null
+++ b/perl-5.14.2-find2perl-transtate-question-mark-properly.patch
@@ -0,0 +1,13 @@
+diff -up a/x2p/find2perl.PL b/x2p/find2perl.PL
+--- a/x2p/find2perl.PL 2010-12-30 03:07:17.000000000 +0100
++++ b/x2p/find2perl.PL 2012-05-29 10:18:11.697683643 +0200
+@@ -681,7 +681,8 @@ sub tab () {
+ sub fileglob_to_re ($) {
+ my $x = shift;
+ $x =~ s#([./^\$()+])#\\$1#g;
+- $x =~ s#([?*])#.$1#g;
++ $x =~ s#\*#.*#g;
++ $x =~ s#\?#.#g;
+ "^$x\\z";
+ }
+
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@xxxxxxxxxxxxxxxxxxxxxxx
https://admin.fedoraproject.org/mailman/listinfo/perl-devel
