Re: Reformatting Chat Protocol?

[Andreas Politz <politza@fh-trier.de>]

"Felix E. Klee" <felix.klee@inka.de> writes:

> In a text file, I want to reformat a block as follows. Its a chat
> protocol with various lines longer than the value of `fill-column'.
>
> From:
>
>   [11.11.2010 17:01:37] bla bla bla bla bla bla bla bla bla bla bla
> bla bla bla bla bla bla bla bla bla bla
>   [11.11.2010 17:04:21] bla bla bla bla bla
>   [11.11.2010 17:05:25] bla bla bla
>
> Into:
>
>   [11.11.2010 17:01:37] bla bla bla bla bla bla bla bla bla bla bla
>     bla bla bla bla bla bla bla bla bla bla
>   [11.11.2010 17:04:21] bla bla bla bla bla bla bla bla bla
>   [11.11.2010 17:05:25] bla bla bla
>
> Or:
>
>   [11.11.2010 17:01:37] bla bla bla bla bla bla bla bla bla bla bla
>                         bla bla bla bla bla bla bla bla bla bla
>   [11.11.2010 17:04:21] bla bla bla bla bla bla bla bla bla
>   [11.11.2010 17:05:25] bla bla bla
>
> Any simple solution?

Try this, i.e. evaluate it in the chat buffer.

(progn
  (mapc 'make-local-variable '(paragraph-start paragraph-separate))
  (setq paragraph-start "\\["
        paragraph-separate "$"
        fill-prefix (make-string (length "[11.11.2010 17:05:25] ")
                                 ?\s))
  (fill-region (point-min) (point-max)))

-ap