Changeset 7743955 for perlwrap.pm

Timestamp:

Feb 22, 2009, 9:21:33 PM (16 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

53d4634

Parents:

f17bb2c0

Message:

Default style: Wrap to window-width minus 1

Normally text in the far-right margin is an indication to scroll
right, so always wrap so as to leave the right-most column empty.

Reported-By: Anders Kaseorg <andersk@mit.edu>

File:

• perlwrap.pm (modified) (1 diff)

perlwrap.pm

@@ -1058 +1058 @@
     my $body = $m->body;
     if ($m->{should_wordwrap}) {
-      $body = BarnOwl::wordwrap($body, BarnOwl::getnumcols()-8);
+      $body = BarnOwl::wordwrap($body, BarnOwl::getnumcols()-9);
     }
     # replace newline followed by anything with