Unicode character issue in git-forest

[n1te1337]

After the last two commits from 5 days ago I get unicode squares instead of tree when using --reverse. Without --reverse it's working fine but with it's all scrambled. When I use the code from this commit --reverse is working fine.

Running ubuntu 13.04 gnome-terminal

[fredrike]

I also have the same problem:

â â ââââ[torrent_dl_folder]ââ[remotes/upstream/torrent_dl_folder]ââAdded support for per_show_download_dir
â ââââââ[hdbits-provider]ââ[remotes/upstream/hdbits-provider]ââAdded support for hdbits torrent provider
âââ¡â¡â¡ââ  
â â â Merge branch 'torrent_1080_subtitles' of https://github.com/junalmeida/Sick-Beard into torrent_1080_subtitles
âââ´ââ  
ââ[HEAD]ââ[torrent_1080_subtitles]ââ[remotes/upstream/torrent_1080_subtitles]ââMerge branches 'hdbits-provider' and 'torrent_dl_folder' into torrent_1080_subtitles

with the expected output:

│ │ ├─│─[torrent_dl_folder]──[remotes/upstream/torrent_dl_folder]──Added support for per_show_download_dir
│ ├─│─│─[hdbits-provider]──[remotes/upstream/hdbits-provider]──Added support for hdbits torrent provider
├─≡≡≡─┘  
├ │ │ Merge branch 'torrent_1080_subtitles' of https://github.com/junalmeida/Sick-Beard into torrent_1080_subtitles
├─┴─┘  
└─[HEAD]──[torrent_1080_subtitles]──[remotes/upstream/torrent_1080_subtitles]──Merge branches 'hdbits-provider' and 'torrent_dl_folder' into torrent_1080_subtitles

I'm not really sure what have happened with perl's encoding but if I add use encoding "utf8"; at line 15 it renders correctly.

This problem started with a92732b.

I'm runnning perl5.12.4 on mac (with screen running in Terminal.app).

Perhaps this is related: http://stackoverflow.com/questions/5244719/encoding-use-utf8-quesiton

[fredrike]

Found a working patch:

@@ -618,7 +618,6 @@ sub TIEHANDLE
        my $self  = {};

        open($self->{fh}, ">&STDOUT");
-       binmode $self->{fh}, ":utf8";

        return bless $self, $class;
 }
@@ -637,5 +636,6 @@ sub UNTIE
        my $fh   = $self->{fh};

        print $fh join($/, reverse split(/\n/s, $self->{saved}));
+       print $fh "\n";
        undef $self->{saved};
 }

The second line fixes a newline after the last row in reverse mode.

[n1te1337]

@fredrike great find! Pull request?

[fredrike]

Pull request created (#19).