[irclog] use breaking zero-width space to break long words, diakopter++

git-svn-id: http://svn.pugscode.org/pugs/misc/irclog@25842 c213334d-75ef-0310-aa23-eaa082d1ae64

1 files changed, 2 insertions, 1 deletions

diff --git a/lib/IrcLog/WWW.pm b/lib/IrcLog/WWW.pm
index 4f252cb..f8fb994 100644
--- a/lib/IrcLog/WWW.pm
+++ b/lib/IrcLog/WWW.pm
@@ -436,7 +436,8 @@ sub break_apart {
 
     my $result = substr $str, 0, $chunk_size;
     for (my $i = $chunk_size; $i < $l; $i += $chunk_size){
-        $result .= " " . substr $str, $i, $chunk_size;
+        my $delim = chr(8203);
+        $result .= $delim . substr $str, $i, $chunk_size;
     }
     return encode_entities($result, ENTITIES);
 }