[Mailman-Developers] Re: editing messages

[Tom Neff]

I patched 1.1 a year ago to allow editing a message before approval. I 
didn't bother with any pantywaist headers or disclaimers, although I 
suppose making one optionally available would be a joy-joy for the San 
Angeles Email Police.  Mellow greetings and be well!

*** admindb.py.orig	Sun Jun 13 04:10:09 1999
--- admindb.py	Mon Sep 18 14:27:48 2000
***************
*** 196,202 ****
  	    # We already handled this request.
  	    continue
  	comment_key = 'comment-%d' % request_id
! 	if form.has_key(comment_key):
  	    list.HandleRequest(request, v, form[comment_key].value)
  	else:
  	    list.HandleRequest(request, v)
--- 196,207 ----
  	    # We already handled this request.
  	    continue
  	comment_key = 'comment-%d' % request_id
! 	contents_key = 'contents-%d' % request_id
! 	if form.has_key(contents_key) and form.has_key(comment_key):
! 	    list.HandleRequest(request, v, form[comment_key].value, 
contents=form[contents_key].value)
! 	elif form.has_key(contents_key):
! 	    list.HandleRequest(request, v, None, 
contents=form[contents_key].value)
! 	elif form.has_key(comment_key):
  	    list.HandleRequest(request, v, form[comment_key].value)
  	else:
  	    list.HandleRequest(request, v)
***************
*** 241,247 ****
  	FontSize("+1", Bold('Contents:'))
          ])
      form.AddItem(t)
!     form.AddItem(Preformatted(val[2][1]))
      form.AddItem('<p>')


--- 246,254 ----
  	FontSize("+1", Bold('Contents:'))
          ])
      form.AddItem(t)
!     # form.AddItem(Preformatted(val[2][1]))
!     form.AddItem(TextArea("contents-%d" % val[0], rows=30, cols=85,
!                  text=val[2][1]))
      form.AddItem('<p>')