RE: Aging Dependencies?
Welch, Brent <welch <at> panasas.com>
2012-04-18 16:42:35 GMT
Let me know what I can do to help. In theory the Makefile captures most of the mechanics to generate a tarball,
and I can update www.beedub.com/exmh. Look at version.csh for hints. You'll want to update some of the
files like html/index.html and html/software.html by hand.
I'm looking at my CVS repository and I have a small number of changes I've accumulated. You'd want to vet
those changes to see if they work OK for you. It appears I added a number of timing things to the log, and I
removed the Fcache_RedisplayUnseen variable trace and do a more direct update in sequences.tcl.
Frankly, I'm not sure that's perfect so you'd need to validate that. I'm attaching the output of "cvs diff"
to this email.
I suggest that someone do the CVS commits to change the version to 2.8.0 (e.g.) and build the tar file - and
test it. I will pull that and use the html files to update www.beedub.com/exmh. I'll have to see about
updating sourceforge with the new tarball.
But, sadly I have to admit that I stopped using exmh about a year ago. A mobile work pattern puts me in a Windows
laptop environment for a big chunk of time, and all my Linux/BSD machines are in a server room. When the
Panasas IT guys upgraded our exchange server to require encrypted channels, and my desktop (which I now
don't use) got a new Ubuntu distribution, I failed to put my elaborate email tool chain back together. So
I've punted to the dark side. I even read email on my iphone sometimes.
--
Brent
-----Original Message-----
From: exmh-users-bounces <at> redhat.com [mailto:exmh-users-bounces <at> redhat.com] On Behalf Of Ken Hornstein
Sent: Wednesday, April 18, 2012 6:27 AM
To: Discussion list for EXMH users
Cc: exmh-workers <at> redhat.com
Subject: Re: Aging Dependencies?
>I'm one of those people - unfortunately, though I can make a release
>show up in the CVS tree, I have no clue how to make one pop *out* of
>the CVS tree...
Is the issue changing the web page? I guess we need to bug Brent Welch
about that. Or is there something else?
>Anybody know of anything that should be iadded to the exmh CVS tree
>before we cut a release? Or is it ready to cut a 2.7.3/2.8/3.0?
Actually ... one issue comes to mind.
When testing out replyfilter, I occasionally run across messages
that make it output warnings (see my email about Andreas's message).
That makes Exmh refuse to pull up an editor ... repl completes
successfully with an exit code of 0 and the draft is okay, but I
guess it's unhappy about the stuff on standard error. Is my
understanding correct? If so ... does that make sense? Should my
replyfilter (or repl) do something else with warnings?
--Ken
_______________________________________________
Exmh-users mailing list
Exmh-users <at> redhat.com
https://www.redhat.com/mailman/listinfo/exmh-users
? .exmhinstall
? DIFF.apr.2012
? Tar.exclude
? exmh
? exmh-2.4.tar.gz
? exmh-2.5.tar.gz
? exmh-2.6.1.tar.gz
? exmh-2.6.2.tar.gz
? exmh-2.6.3.tar.gz
? exmh-2.6.tar.gz
? exmh-2.7.0.tar.gz
? exmh-2.7.2.tar.gz
? exmh-async
? exmh-bg
? exmh-strip
? ftp.expect
? html-2.4.tar.gz
? html-2.5.tar.gz
? html-2.6.1.tar.gz
? html-2.6.2.tar.gz
? html-2.6.3.tar.gz
? html-2.6.tar.gz
? html-2.7.0.tar.gz
? html-2.7.2.tar.gz
? inc.expect
? lib/flist.tcl.new
? lib/html_content.tcl.good
? lib/html_content.tcl.new
? lib/main.tcl.good
? lib/main.tcl.new
? lib/mime.tcl.good
? lib/mime.tcl.new
? lib/msg.tcl.good
? lib/msg.tcl.new
? lib/seditExtras.tcl.good
? lib/seditExtras.tcl.new
? lib/html/Tar.exclude
? lib/html/exmh.CHANGES.txt
? misc/jpilot-lookup.tcl
? misc/query_jpilot.sh
Index: lib/fcache.tcl
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/fcache.tcl,v
retrieving revision 1.13
diff -r1.13 fcache.tcl
71c71,72
< trace variable flist wu Fcache_RedisplayUnseen
---
> # This is an expensive trace. See SeqSetCount
> # trace variable flist wu Fcache_RedisplayUnseen
99c100
< proc Fcache_RedisplayUnseen { array elem op } {
---
> proc Fcache_RedisplayUnseen { seq } {
102,103c103
< set force [scan $elem "seqcount,%s,$mhProfile(unseen-sequence)" folder]
< Fcache_Display $force
---
> Fcache_Display [expr {"$seq" == "$mhProfile(unseen-sequence)"}]
Index: lib/mh.tcl
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/mh.tcl,v
retrieving revision 1.60
diff -r1.60 mh.tcl
580a581,586
> Exmh_Debug Mh_SequenceUpdate $folder $how $seq $msgids $which
> Mh_SequenceUpdateTimed $folder $how $seq $msgids $which
> Exmh_Debug Mh_Sequence Update complete
> }
>
> proc Mh_SequenceUpdateTimed { folder how seq {msgids {}} {which public}} {
Index: lib/msg.tcl
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/msg.tcl,v
retrieving revision 1.36
diff -r1.36 msg.tcl
118,121c118,125
< Ftoc_ClearCurrent
< set oldcur [Seq_Msgs $exmh(folder) cur]
< Mh_SetCur $exmh(folder) $msgid
< set lineno [Ftoc_FindMsg $msgid]
---
> Exmh_Debug Ftoc_ClearCurrent [time Ftoc_ClearCurrent]
> # Ftoc_ClearCurrent
> Exmh_Debug Seq_Msgs [time {set oldcur [Seq_Msgs $exmh(folder) cur]}]
> # set oldcur [Seq_Msgs $exmh(folder) cur]
> Exmh_Debug Mh_SetCur [time {Mh_SetCur $exmh(folder) $msgid}]
> # Mh_SetCur $exmh(folder) $msgid
> Exmh_Debug Ftoc_FindMsg [time {set lineno [Ftoc_FindMsg $msgid]}]
> # set lineno [Ftoc_FindMsg $msgid]
Index: lib/ps.tcl
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/ps.tcl,v
retrieving revision 1.1
diff -r1.1 ps.tcl
66a67
> darwin -
Index: lib/sequences.tcl
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/sequences.tcl,v
retrieving revision 1.24
diff -r1.24 sequences.tcl
177c177
< # This trace is crude, and now we do all the updating in
---
> # This trace is expensive, and now we do all the updating in
189c189
< ldelete flist($seq) $folder
---
> set ix [lsearch $flist($seq) $folder]
191c191,193
< lappend flist($seq) $folder
---
> if {$ix < 0} {
> lappend flist($seq) $folder
> }
193a196,197
> } elseif {$ix >= 0} {
> ldelete flist($seq) $folder
219a224,230
> # This procedure replaces an expensive trace on the flist var from fcache.tcl
>
> proc SeqSetCount {folder seq count} {
> global flist mhProfile
> set flist(seqcount,$folder,$seq) $count
> Fcache_RedisplayUnseen $seq
> }
231c242
< set flist(seqcount,$folder,$seq) 0
---
> SeqSetCount $folder $seq 0
279c290
< set flist(seqcount,$folder,$seq) [expr $new + $num]
---
> SeqSetCount $folder $seq [expr {$new + $num}]
304c315
< set flist(seqcount,$folder,$seq) 0
---
> SeqSetCount $folder $seq 0
309c320,321
< set flist(seqcount,$folder,$seq) $newnum
---
> Exmh_Debug flist(seqcount) [time {
> SeqSetCount $folder $seq $newnum
311,312c323,325
< if {![info exist flist($seq)] || ([lsearch $flist($seq) $folder] < 0)} {
< lappend flist($seq) $folder
---
> if {![info exist flist($seq)]} {
> # SeqCount will append $folder to flist($seq) if necessary
> set flist($seq) {}
314c327,328
< SeqCount $folder $seq
---
> }]
> Exmh_Debug SeqCount $folder $seq [time {SeqCount $folder $seq}]
320c334
< Fdisp_HighlightUnseen $folder
---
> Exmh_Debug Fdisp_HighlightUnseen [time {Fdisp_HighlightUnseen $folder}]
352c366,368
< Seq_Set $folder $seq [Mh_Sequence $folder $seq]
---
> Exmh_Debug Mh_Sequence $folder $seq [time {set s [Mh_Sequence $folder $seq]}]
> # Seq_Set $folder $seq [Mh_Sequence $folder $seq]
> Exmh_Debug Seq_Set $folder $seq [time {Seq_Set $folder $seq $s}]
Index: lib/html/index.html
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/html/index.html,v
retrieving revision 1.30
diff -r1.30 index.html
66,69c66,67
< <li><a HREF="http://www.ics.uci.edu/~mh/book/">Jerry Peek's MH &
< xmh book</a>, which includes
< <a HREF="http://www.ics.uci.edu/~mh/book/exmh/">chapters about
< exmh</a>.
---
> <li><a HREF="http://rand-mh.sourceforge.net/book/">Bill Wohler and Jerry Peek's MH &
> nmh book</a>, which includes chapters about exmh.
123c121
< <li><a HREF="http://www.cis.ohio-state.edu/hypertext/faq/usenet/mail/mime-faq/top.html">MIME
---
> <li><a HREF="http://www.newt.com/faq/mh.html">MH
125,131d122
<
< <li><a HREF="http://www.cis.ohio-state.edu/hypertext/faq/usenet/mail/mh-faq/top.html">MH
< Frequently Asked Questions</a>
<
< <li><a HREF="http://www.cis.ohio-state.edu/hypertext/faq/usenet/tcl-faq/top.html">TCL
< Frequently Asked Questions</a>
<
Index: lib/html/software.html
===================================================================
RCS file: /cvsroot/exmh/exmh/lib/html/software.html,v
retrieving revision 1.31
diff -r1.31 software.html
43,46c43,45
< HREF="ftp://ftp.ics.uci.edu/pub/mh">mh-6.8.tar.Z</a>
< <dd>The current version of MH (standard with some UNIX systems). Due to security
< issues with the handling of attachments, it is <em>strongly</em> recommended
< that you <b>use the latest nmh</b>.
---
> HREF="http://sourceforge.net/projects/rand-mh/">rand-mh</a>
> <dd>The original MH mail package. This is also the web site for the
> <a href="http://rand-mh.sourceforge.net/book/">MH and nmh book</a>
_______________________________________________
Exmh-workers mailing list
Exmh-workers <at> redhat.com
https://www.redhat.com/mailman/listinfo/exmh-workers