Re: post-upgrade Log no longer works.

Harvey Eneman <[email protected]> Tue, 10 Sep 2013 12:34:23 -0700
Newsgroups gmane.mail.exmh.user
Message-ID <[email protected]>
The corrected patch would be:

*** source.tcl.orig	2013-09-10 09:41:07.000000000 -0700
--- source.tcl	2013-09-10 12:31:30.000000000 -0700
***************
*** 1,9 ****
  if {$exmh(sourceHook) && [info command source-orig] ==  ""} {
      rename source source-orig
!     proc source {file} {
  	 global SourceHook
! 	 set result [uplevel 1 [list source-orig $file]]
! 	 set fn [file rootname [file tail $file]]
  	 if [info exists SourceHook($fn)] {
  	    if [catch {uplevel 1 $SourceHook($fn)} err] {
  		Exmh_Status "Error in source hook for $fn: $err" warning
--- 1,9 ----
  if {$exmh(sourceHook) && [info command source-orig] ==  ""} {
      rename source source-orig
!     proc source {args} {
  	 global SourceHook
! 	 set result [uplevel 1 "source-orig $args"]]
! 	 set fn [file rootname [file tail [lindex $args end]]]
  	 if [info exists SourceHook($fn)] {
  	    if [catch {uplevel 1 $SourceHook($fn)} err] {
  		Exmh_Status "Error in source hook for $fn: $err" warning

_______________________________________________
Exmh-users mailing list
[email protected]
https://www.redhat.com/mailman/listinfo/exmh-users
(unnamed) (message/rfc822, 5.2 KB) - not displayed
signature.asc (application/pgp-signature, 226 B)
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.13 (Darwin)
Comment: Exmh version 2.7.2 01/07/2005

iD8DBQFSL3Q/JWLrSYxEfJMRAvUNAJ9tD9jC/kaEqDU49EMTB50gxNk+TwCdEwP9
SHSnQKc+DndAVDfVPbrkcpo=
=o7j6
-----END PGP SIGNATURE-----