From ee4709c7854519b87eb812880152eda78abd6fc3 Mon Sep 17 00:00:00 2001
From: x2003bruneau <x2003bruneau@9869982d-c50d-0410-be91-f2a2ec7c7c7b>
Date: Sun, 5 Mar 2006 22:25:08 +0000
Subject: [PATCH] =?utf8?q?Evite=20que=20wrap=20retourne=20une=20cha=C3=83?=
 =?utf8?q?=C2=AEne=20vide=20si=20Autoformat=20n'est=20pas=20install=C3=83?=
 =?utf8?q?=C2=A9=20sur=20la=20machine?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

git-svn-id: svn+ssh://murphy/home/svn/banana/trunk@29 9869982d-c50d-0410-be91-f2a2ec7c7c7b
---
 banana/misc.inc.php | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/banana/misc.inc.php b/banana/misc.inc.php
index f8df870..8859e98 100644
--- a/banana/misc.inc.php
+++ b/banana/misc.inc.php
@@ -294,13 +294,16 @@ function wrap($text, $_prefix="")
         $text = join("\n-- \n", $parts);
     } else {
         $sign = '';
-        $text = $text;
     }
    
     global $banana;
     $length = $banana->wrap;
     $cmd = "echo ".escapeshellarg($text)." | perl -MText::Autoformat -e 'autoformat {left=>1, right=>$length, all=>1 };'";
-    exec($cmd, $result);
+    $ret = 0;
+    exec($cmd, $result, $ret);
+    if ($ret != 0) {
+        $result = split("\n", $text);
+    }
 
     return $_prefix.join("\n$_prefix", $result).($_prefix ? '' : $sign);
 }
-- 
2.1.4