From: Kevin Ryde <user42@zip.com.au>
To: 12756@debbugs.gnu.org
Subject: bug#12756: 24.2; woman.el vs adaptive-fill-mode hanging indent
Date: Mon, 29 Oct 2012 08:44:26 +1100 [thread overview]
Message-ID: <87y5iqclvp.fsf@blah.blah> (raw)
[-- Attachment #1: Type: text/plain, Size: 1227 bytes --]
With the file percent.1 below and an 80-column screen the file percent.1
below processed with
M-x woman-find-file percent.1
gives
%%%%Some percents one two three four five six seven eight
nine ten eleven twelve thirteen fourteen fifteen.
Where I expected
%%%%Some percents one two three four five six seven eight
nine ten eleven twelve thirteen fourteen fifteen.
It seems woman.el uses fill-region-as-paragraph and that
adaptive-fill-mode, which is t by default, causes the "%"s in the input
to become a fill prefix. I think that shouldn't be done, that instead
woman.el should control all indentation.
It seems this only affects roff source where the paragraph flowed is a
single line of the input. You can make a very long input line to see
multiple hanging lines in the output. Various other prefix characters
in adaptive-fill-regexp are affected similarly, eg "#" instead of "%".
I get some joy from forcing adaptive-fill-mode off in
woman-decode-region.
2012-10-27 Kevin Ryde <user42@zip.com.au>
* woman.el (woman-decode-region): Let-bind adaptive-fill-mode nil so a
paragraph consisting of a single long input line "%%Foo ..." doesn't
have "%" treated as a hanging indent.
[-- Attachment #2: percent.1 --]
[-- Type: text/plain, Size: 127 bytes --]
.TH FOO 1
.SH NAME
%%%%Some percents one two three four five six seven eight nine ten eleven twelve thirteen fourteen fifteen.
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #3: woman.el.adaptive-fill.diff --]
[-- Type: text/x-diff, Size: 472 bytes --]
--- woman.el.orig 2012-10-27 16:21:40.000000000 +1100
+++ woman.el 2012-10-27 16:25:06.000000000 +1100
@@ -2228,6 +2228,7 @@
;; it were it would need to be a marker rather than a position!
;; First force the correct environment:
(let ((case-fold-search nil) ; This is necessary!
+ (adaptive-fill-mode nil) ; No special "%" "#" etc filling.
(woman-string-alist woman-string-alist)
(woman-fill-column woman-fill-column)
woman-negative-vertical-space)
[-- Attachment #4: Type: text/plain, Size: 1234 bytes --]
In GNU Emacs 24.2.1 (i486-pc-linux-gnu, GTK+ Version 2.24.10)
of 2012-09-10 on biber, modified by Debian
Windowing system distributor `The X.Org Foundation', version 11.0.10707000
Configured using:
`configure '--build' 'i486-linux-gnu' '--build' 'i486-linux-gnu'
'--prefix=/usr' '--sharedstatedir=/var/lib' '--libexecdir=/usr/lib'
'--localstatedir=/var/lib' '--infodir=/usr/share/info'
'--mandir=/usr/share/man' '--with-pop=yes'
'--enable-locallisppath=/etc/emacs24:/etc/emacs:/usr/local/share/emacs/24.2/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/24.2/site-lisp:/usr/share/emacs/site-lisp'
'--with-crt-dir=/usr/lib/i386-linux-gnu' '--with-x=yes'
'--with-x-toolkit=gtk' '--with-toolkit-scroll-bars'
'build_alias=i486-linux-gnu' 'CFLAGS=-g -O2 -fstack-protector
--param=ssp-buffer-size=4 -Wformat -Werror=format-security -Wall'
'CPPFLAGS=-D_FORTIFY_SOURCE=2''
Important settings:
value of $LC_ALL: nil
value of $LC_COLLATE: nil
value of $LC_CTYPE: nil
value of $LC_MESSAGES: nil
value of $LC_MONETARY: nil
value of $LC_NUMERIC: nil
value of $LC_TIME: nil
value of $LANG: en_AU
value of $XMODIFIERS: nil
locale-coding-system: iso-latin-1-unix
default enable-multibyte-characters: t
next reply other threads:[~2012-10-28 21:44 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-10-28 21:44 Kevin Ryde [this message]
2012-10-30 2:53 ` bug#12756: 24.2; woman.el vs adaptive-fill-mode hanging indent Stefan Monnier
2012-11-03 20:31 ` Kevin Ryde
2012-11-04 12:29 ` Stefan Monnier
2012-11-06 1:50 ` Stefan Monnier
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87y5iqclvp.fsf@blah.blah \
--to=user42@zip.com.au \
--cc=12756@debbugs.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.