[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: I need a function that breaks all lines marked at 40 chars
From: |
Thorsten Jolitz |
Subject: |
Re: I need a function that breaks all lines marked at 40 chars |
Date: |
Mon, 29 Jul 2013 11:23:06 +0200 |
User-agent: |
Gnus/5.130002 (Ma Gnus v0.2) Emacs/24.3 (gnu/linux) |
gerlach <jack@aiai.de> writes:
> Hi,
>
> I'm writing mails with emacs and I sometimes want to
> break all text lines that I marked to say 40 chars.
> But empty line (only returns) should not be filled to
> 40 chars. Entire words should not be cutted within the
> word.
>
> Can you help me writing such a function? I'm beginner ...
>
> I want:
> 1. mark the the text I want to break at 40 chars
> 2. call a function (M-x .... ???? )
> and the text ist breaked
>
> Perhaps emacs has such a function already build-in. Where?
>
> The function may be placed in .emacs profile with hard
> coded number of chars , e.g. 40
>
> tia
> Eckard
#+begin_src emacs-lisp
(defun tj/fill-region-at-40 ()
"Fill region with `fill-column' set at 40 chars."
(interactive)
(and (region-active-p)
(let ((fill-column 40))
(fill-region (region-beginning) (region-end)))))
#+end_src
#+results:
: tj/fill-region-at-40
would turn this region:
,------------------------------------------------------------------------------
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
|
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
|
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla blablablabla blablablabla blablablabla
`------------------------------------------------------------------------------
into this:
,---------------------------------------
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
|
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
|
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
| blablablabla blablablabla blablablabla
`---------------------------------------
--
cheers,
Thorsten