Re: base64 message body decode when replying???
Brent Welch <[email protected]>
| Newsgroups | gmane.mail.exmh.user |
|---|---|
| Message-ID | <[email protected]> |
Here's what I do:
In the sedit More... menu I've added an Unquote menu item:
*Sedit.Menubar.more.m.l_unquote: Unquote
*Sedit.Menubar.more.m.c_unquote: SeditUnquote {$t}
The function SeditUnquote is in the attached file.
It's handles either quoted printable or base-64.
The QP decode is lame, and should probably use mimencode -u -q
When I'm using a dumb terminal and using Repl directly,
I pipe contents of my vi buffer through an "un64" script
I wrote. Also attached
>>>[email protected] said:
>
>
> > >That makes sense. Has anyone scripted a filter, maybe triggered
> > >via ~/.mh_profile, which pre-formats the message before handing
> > >off the content to the actual repl?
>
> Yes. Here's something I wrote back in '04. I think it should do
> what you want. If someone figures out how to make ~/.mh_profile
> configure repl to "do the right thing" let me know. I don't care
> that much--I just invoke it on demand (maybe once or twice a week.)
>
> Looked at Sylpheed last week. Bah. I wonder if EXMH will last
> forever?
>
> steve
> --
>
> #!/bin/bash
> repl -filter /dev/null -nodraftfolder -nowhatnowproc $*
> (cat ~/Mail/draft; echo -e "\n > ---- Original Message ----" ; \
> mhshow cur -type text -nopause -nomoreproc \
> | egrep -v '^Return-Path|^Delivery-Date|^part[ ]+text/plain' \
> | egrep -v '^X-|^MIME' \
> | sed 's/^/ > /' \
> ) > ~/Mail/drafts/999
> comp -use -draftfolder drafts -draftmessage 999
> rm -f ~/Mail/draft
> rm -f ~/Mail/drafts/999
--
Brent Welch
Director, Software Architecture, Panasas Inc
The Leader in Parallel Storage
www.panasas.com
[email protected]
_______________________________________________
Exmh-users mailing list
[email protected]
https://www.redhat.com/mailman/listinfo/exmh-users
un64
(text/plain, 188 B)
#!/usr/pan/bin/tclsh8.3
set tmp [open /tmp/un64 w]
while {[gets stdin line] >= 0} {
regsub {^ *> *} $line {} line
puts $tmp $line
}
close $tmp
puts [exec mimencode -u -b < /tmp/un64]
seditHack.tcl
(application/x-tcl, 1.2 KB) - not displayed