Missing washing function

Missing washing function

[Karl Eichwalder]

[-- Attachment #1: Type: text/plain, Size: 528 bytes --]

It happens quite often that people send "flowed" messages, but failed to
declare them properly (I'll attach such a message - I hope Emacs will
not strip the SPCs at the end of the lines).  Run `W w' on such a
message will fill it nicely, but it will not determine paragraphs ends
properly (after "Preface", after "worldwide access.", etc.).  Lines to
be flowed together end with a SPC, paragraph ends end with a non-SPC
character.

I'd like to propose to make the washing function add an additional at
the end of an paragraph.


[-- Attachment #2: Type: message/rfc822, Size: 2370 bytes --]

From: "Karl Dietz" <karl.dietz@gmx.de>
To: inetbib@ub.uni-dortmund.de
Subject: Berlin Declaration on Open Access to Knowledge
Date: Sat, 25 Oct 2003 13:54:15 +0200
Message-ID: <3F9A8087.15189.59D7097@localhost>

Berlin Declaration on Open Access to Knowledge 
in the Sciences and Humanities

Preface
The Internet has fundamentally changed the practical and 
economic realities 
of distributing scientific knowledge and cultural 
heritage. For the first 
time ever, the Internet now offers the chance to 
constitute a global and 
interactive representation of human knowledge, including 
cultural heritage 
and the guarantee of worldwide access.
We, the undersigned, feel obliged to address the 
challenges of the Internet 
as an emerging functional medium for distributing 
knowledge. Obviously, 
these developments will be able to significantly modify 
the nature of 
scientific publishing as well as the existing system of 
quality assurance.
In accordance with the spirit of the Declaration of the 
Budapest Open Acess 
Initiative, the ECHO Charter and the Bethesda Statement 
on Open Access 
Publishing, we have drafted the Berlin Declaration to 
promote the Internet 
as a functional instrument for a global scientific 
knowledge base and human 
reflection and to specify measures which research policy 
makers, research 
institutions, funding agencies, libraries, archives and 
museums need to 
consider.

Goals
Our mission of disseminating knowledge is only half 
complete if the 
information is not made widely and readily available to 
society. New 
possibilities of knowledge dissemination not only 
through the classical 
form but also and increasingly through the open access 
paradigm via the 
Internet have to be supported. We define open access as 
a comprehensive 
source of human knowledge and cultural heritage that has 
been approved by 
the scientific community.
In order to realize the vision of a global and 
accessible representation of 
knowledge, the future Web has to be sustainable, 
interactive, and 
transparent. Content and software tools must be openly 
accessible and 
compatible.


[...]



aus:
------------
<{HYPERLINK "http://www.zim.mpg.de/openaccess-
berlin/berlindeclaration.html"}http://www.zim.mpg.de/openaccess-
berlin/berlindeclaration.html>



[-- Attachment #3: Type: text/plain, Size: 214 bytes --]



-- 
                                                         |      ,__o
                                                         |    _-\_<,
http://www.gnu.franken.de/ke/                            |   (*)/'(*)

Re: Missing washing function

[Karl Pflästerer]

On 25 Oct 2003, Karl Eichwalder <- ke@gnu.franken.de wrote:

> It happens quite often that people send "flowed" messages, but failed to
> declare them properly (I'll attach such a message - I hope Emacs will
> not strip the SPCs at the end of the lines).  Run `W w' on such a
> message will fill it nicely, but it will not determine paragraphs ends
> properly (after "Preface", after "worldwide access.", etc.).  Lines to
> be flowed together end with a SPC, paragraph ends end with a non-SPC
> character.

> I'd like to propose to make the washing function add an additional at
> the end of an paragraph.

I wrote some time ago about the same problem in the german gnus NG.  I
had first written a new washing function which treated an article as
format=flowed; afterwards I saw that `W Q'
(`gnus-article-fill-long-lines') does a good job there.  Try it first.


   KP

-- 
If you have nothing to say on a subject, replying with a line such as,
"I agree with this." puts you in the TO:'s for all future messages, and
establishes you as "one who really cares", if not an actual expert, on
the topic at hand.         -- from the Symbolics Guidelines for Sending Mail

Re: Missing washing function

[Karl Eichwalder]

sigurd@12move.de (Karl Pflästerer) writes:

> I wrote some time ago about the same problem in the german gnus NG.  I
> had first written a new washing function which treated an article as
> format=flowed; afterwards I saw that `W Q'
> (`gnus-article-fill-long-lines') does a good job there.  Try it first.

In this case `W Q' does nothing.  Maybe, it's time to update gnus; I'm
using a CVS version older than 2003-05-19.

-- 
                                                         |      ,__o
                                                         |    _-\_<,
http://www.gnu.franken.de/ke/                            |   (*)/'(*)

Re: Missing washing function

[Karl Pflästerer]

On 28 Oct 2003, Karl Eichwalder <- ke@gnu.franken.de wrote:

> sigurd@12move.de (Karl Pflästerer) writes:

>> I wrote some time ago about the same problem in the german gnus NG.  I
>> had first written a new washing function which treated an article as
>> format=flowed; afterwards I saw that `W Q'
>> (`gnus-article-fill-long-lines') does a good job there.  Try it first.

> In this case `W Q' does nothing.  Maybe, it's time to update gnus; I'm
> using a CVS version older than 2003-05-19.

Maybe.  If it doesn't work try the following function.  I use it
sometimes and it works.  The keybindings are (still) free.  Reiner
proposed in that thread that if that function should make it in Gnus
some keybindings should be changed.

here is his proposal 
,----[ Message-ID: <v9adenikkj.fsf@marauder.physik.uni-ulm.de> ]
| Bisher:
| 
| W Q		gnus-article-fill-long-lines
| W w		gnus-article-fill-cited-article
| 
| Nachher (nur als Beispiel):
| 
| W Q		gnus-article-fill-long-lines
| W w		gnus-article-fill-cited-article
| (Diese sollte man aus Komptibilitätsgründen wohl nicht wegnehmen.)
| W F L		gnus-article-fill-long-lines
| W F l		gnus-article-fill-cited-article
| W F F		gnus-article-fill-flowed
`----


(defun gnus-article-fill-flowed ()
  (interactive)
  (save-excursion
    (set-buffer gnus-article-buffer)
    (save-restriction
      (let ((buffer-read-only nil))
	(gnus-narrow-to-body)
	(fill-flowed)))))

(define-key gnus-summary-wash-map "WF" 'gnus-article-fill-flowed)
(define-key gnus-summary-mode-map "WF" 'gnus-article-fill-flowed)


Does this help?

   KP

-- 
You know you've been sitting in front of your Lisp machine too long
when you go out to the junk food machine and start wondering how to
make it give you the CADR of Item H so you can get that yummie
chocolate cupcake that's stuck behind the disgusting vanilla one.

Re: Missing washing function

[Jesper Harder]

sigurd@12move.de (Karl Pflästerer) writes:

> (defun gnus-article-fill-flowed ()
>   (interactive)
>   (save-excursion
>     (set-buffer gnus-article-buffer)
>     (save-restriction
>       (let ((buffer-read-only nil))
> 	(gnus-narrow-to-body)
> 	(fill-flowed)))))

I'm just nit-picking, but I think `with-current-buffer' is slightly
cleaner than `save-excursion':

(defun gnus-article-fill-flowed ()
  (interactive)
  (with-current-buffer gnus-article-buffer
    (save-restriction
      (let ((buffer-read-only nil))
	(gnus-narrow-to-body)
	(fill-flowed)))))

Re: Missing washing function

[Karl Pflästerer]

On 28 Oct 2003, Jesper Harder <- harder@ifa.au.dk wrote:

> sigurd@12move.de (Karl Pflästerer) writes:

>> (defun gnus-article-fill-flowed ()
>>   (interactive)
>>   (save-excursion
>>     (set-buffer gnus-article-buffer)
>>     (save-restriction
>>       (let ((buffer-read-only nil))
>> 	(gnus-narrow-to-body)
>> 	(fill-flowed)))))

> I'm just nit-picking, but I think `with-current-buffer' is slightly
> cleaner than `save-excursion':

> (defun gnus-article-fill-flowed ()
>   (interactive)
>   (with-current-buffer gnus-article-buffer
>     (save-restriction
>       (let ((buffer-read-only nil))
> 	(gnus-narrow-to-body)
> 	(fill-flowed)))))

You are clearly right.  Or perhaps even better:

(defun gnus-article-fill-flowed ()
  (interactive)
  (gnus-with-article-buffer
    (save-restriction
      (gnus-narrow-to-body)
      (fill-flowed))))

[best would be to add a doctsring :-)]


   KP

-- 
      And has thou slain the Jabberwock?
          Come to my arms, my beamish boy!
      O frabjous day!  Callooh!  Callay!'
          He chortled in his joy.   "Lewis Carroll" "Jabberwocky"

Re: Missing washing function

[Karl Eichwalder]

sigurd@12move.de (Karl Pflästerer) writes:

> You are clearly right.  Or perhaps even better:
>
> (defun gnus-article-fill-flowed ()
>   (interactive)
>   (gnus-with-article-buffer
>     (save-restriction
>       (gnus-narrow-to-body)
>       (fill-flowed))))
>
> [best would be to add a doctsring :-)]

Thanks, this work nicely.

-- 
                                                         |      ,__o
                                                         |    _-\_<,
http://www.gnu.franken.de/ke/                            |   (*)/'(*)