From 99a5455d74a9643a0e7f5c09d49dadb83b4aaac9 Mon Sep 17 00:00:00 2001 From: Cy Schubert Date: Sat, 8 Dec 2012 07:08:09 +0000 Subject: Update 2,7,2 --> 2.8.0 Feature safe: yes --- mail/exmh2/files/patch-lib-folder.tcl | 25 ------------------------- 1 file changed, 25 deletions(-) delete mode 100644 mail/exmh2/files/patch-lib-folder.tcl (limited to 'mail/exmh2/files/patch-lib-folder.tcl') diff --git a/mail/exmh2/files/patch-lib-folder.tcl b/mail/exmh2/files/patch-lib-folder.tcl deleted file mode 100644 index b538f1fb9cf0..000000000000 --- a/mail/exmh2/files/patch-lib-folder.tcl +++ /dev/null @@ -1,25 +0,0 @@ ---- lib/folder.tcl.orig Wed Dec 29 23:39:51 2004 -+++ lib/folder.tcl Wed May 25 00:02:21 2005 -@@ -311,17 +311,17 @@ - - set out [open $fn w] - puts $out "wm withdraw ." -- puts $out "source $exmh(library)/folder.tcl" -+ puts $out [list lappend auto_path $exmh(library)] - puts $out [list set mhProfile(delprefix) $mhProfile(delprefix)] - puts $out [list set mhProfile(purgeage) $mhProfile(purgeage)] - puts $out [list set mhProfile(path) $mhProfile(path)] -- puts $out "proc Exmh_Status { s } \{catch \{send \"[winfo name .]\" \[list Exmh_Status \$s]\}\}" -+ puts $out "proc Exmh_Status { s args } \{catch \{send \"[winfo name .]\" \[list Exmh_Status \$s]\}\}" - puts $out "proc Exmh_Debug { args } {}" -- puts $out [list proc File_Delete [info args File_Delete] [info body File_Delete]] -+ puts $out "Env_Init" - foreach folder $folderlist { -- puts $out "Folder_Purge $folder" -+ puts $out [list Folder_Purge $folder] - } -- puts $out "File_Delete $fn" -+ puts $out [list File_Delete $fn] - puts $out exit - close $out - exec $wish -f $fn & -- cgit v1.2.3