Re: [exmh-workers] Aging Dependencies?

"Welch, Brent" <[email protected]> writes:
> I do plan to make a 2.8.1 after we flush out more patches like this that folks have been carrying around.

I have a couple of ancient patches that I've been carrying, which maybe
you'd consider:

(1) Allow stuff in front of "X server insecure" in send.tcl;
this seems to be necessary in my operating environment:

*** /usr/local/lib/exmh-2.7.2/send.tcl~	Tue Oct 27 22:33:17 2009
--- /usr/local/lib/exmh-2.7.2/send.tcl	Tue Oct 27 22:36:20 2009
***************
*** 14,20 ****
   proc send { args } {
      global errorInfo errorCode
      if [catch {eval tk-send $args} x] {
! 	if [string match "X server insecure*" $x] {
  	    catch {exec xhost} out
  	    set retry 0
  	    if [regexp disabled $out] {
--- 14,20 ----
   proc send { args } {
      global errorInfo errorCode
      if [catch {eval tk-send $args} x] {
! 	if [string match "*X server insecure*" $x] {
  	    catch {exec xhost} out
  	    set retry 0
  	    if [regexp disabled $out] {

(2) Use the modified send proc in exmh-async (probably there are better
ways to do this, and I'm not sure if it needs to be configurable).
I find this to be necessary too, as sometimes things reset the xhost
list while I'm editing a message:

*** /usr/local/bin/exmh-async~	Tue Oct 27 22:33:10 2009
--- /usr/local/bin/exmh-async	Tue Oct 27 22:37:02 2009
***************
*** 9,14 ****
--- 9,19 ----
  package require Tk
  wm withdraw .
  
+ # CRUDE HACK: force sendHack behavior
+ source /usr/local/lib/exmh-2.7.2/send.tcl
+ # needed by send.tcl
+ proc Exmh_Status { args } { }
+ 
  # simple argv cracking
  set exmh [lindex $argv 0]
  set editorCmd [lrange $argv 1 end]


			regards, tom lane