[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]

Re: [Libguestfs] libguestfs-1.22.1 compilation error



Yes i am using ArchLinux (what else is there ?)

and i hate/love (mixed feelings) when you have a valid point and give
such pointers!

indeed there is a diff between your perl and mine


[tmp]> diff -u rwm perl
--- rwm    2013-05-30 13:24:21.066286908 +0300
+++ perl    2013-05-30 13:26:27.149615793 +0300
@@ -1,14 +1,14 @@
-        if ($t =~ /\G([^\n]{0,$ll})($break|\n+|\z)/xmgc) {
+        if ($t =~ /\G((?:(?=[^\n])\X){0,$ll})($break|\n+|\z)/xmgc) {
                 $r .= $unexpand
                         ? unexpand($nl . $lead . $1)
                         : $nl . $lead . $1;
                 $remainder = $2;
-        } elsif ($huge eq 'wrap' && $t =~ /\G([^\n]{$ll})/gc) {
+        } elsif ($huge eq 'wrap' && $t =~ /\G((?:(?!=[^\n])\X){$ll})/gc) {
                 $r .= $unexpand
                         ? unexpand($nl . $lead . $1)
                         : $nl . $lead . $1;
                 $remainder = defined($separator2) ? $separator2 : $separator;
-        } elsif ($huge eq 'overflow' && $t =~
/\G([^\n]*?)($break|\n+|\z)/xmgc) {
+        } elsif ($huge eq 'overflow' && $t =~
/\G((?:(?=[^\n])\X)*?)($break|\n+|\z)/xmgc) {
                 $r .= $unexpand
                         ? unexpand($nl . $lead . $1)
                         : $nl . $lead . $1;


> pacman -Qi perl|grep wrap

perl-text-tabs-wrap=2012.0818



i am searching to find out WHY is this happening (and where).


I can patch this for my PKGBUILD - but i would prefer to find a more
suitable solution for everybody.

Can you plz inform my about fedora's perl-text-tabs-wrap version ?


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]