diff options
Diffstat (limited to 'mail/exmh2/files')
-rw-r--r-- | mail/exmh2/files/patch-lib-folder.tcl | 25 | ||||
-rw-r--r-- | mail/exmh2/files/patch-lib-quote.tcl | 11 | ||||
-rw-r--r-- | mail/exmh2/files/patch-lib-uri.tcl | 13 |
3 files changed, 0 insertions, 49 deletions
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 & diff --git a/mail/exmh2/files/patch-lib-quote.tcl b/mail/exmh2/files/patch-lib-quote.tcl deleted file mode 100644 index 14f78ff7ed19..000000000000 --- a/mail/exmh2/files/patch-lib-quote.tcl +++ /dev/null @@ -1,11 +0,0 @@ ---- lib/quote.tcl.orig Mon Jul 26 20:23:33 2004 -+++ lib/quote.tcl Wed May 25 00:04:18 2005 -@@ -23,7 +23,7 @@ - return; - } else { - if {$quote(symlink)} { -- if [catch {file link -symbolic $mhProfile(path)/$folder/$msg $quote(filename)} err] { -+ if [catch {exec ln -s $mhProfile(path)/$folder/$msg $quote(filename)} err] { - Exmh_Debug "Quote_MakeFile: $err" - } - } else { diff --git a/mail/exmh2/files/patch-lib-uri.tcl b/mail/exmh2/files/patch-lib-uri.tcl deleted file mode 100644 index f9c5df53e69b..000000000000 --- a/mail/exmh2/files/patch-lib-uri.tcl +++ /dev/null @@ -1,13 +0,0 @@ ---- lib/uri.tcl.orig Mon Jul 26 20:23:34 2004 -+++ lib/uri.tcl Wed May 25 00:05:06 2005 -@@ -174,8 +174,8 @@ - global mimeHdr mime - set fileName $mimeHdr($part,file) - File_Delete [Env_Tmp]/exmh.[pid].html -- if [catch {file link -hard $fileName [Env_Tmp]/exmh.[pid].html}] { -- file copy $fileName [Env_Tmp]/exmh.[pid].html -+ if [catch {exec ln $fileName [Env_Tmp]/exmh.[pid].html}] { -+ exec cp $fileName [Env_Tmp]/exmh.[pid].html - } - set fileName [Env_Tmp]/exmh.[pid].html - Exmh_Status "HTML Load $fileName" |