1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-12-27 05:10:36 +00:00

- Update to 2.7.2

PR:		ports/80715
Submitted by:	Kevin Oberman <oberman@es.net>
This commit is contained in:
Pav Lucistnik 2005-05-24 22:13:33 +00:00
parent 19a6a69e90
commit 42bdc9f77e
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=136074
6 changed files with 53 additions and 3 deletions

View File

@ -7,7 +7,7 @@
# "+=" and "?=" lines are for sharing this Makefile with japanese/exmh2.
PORTNAME= exmh
PORTVERSION= 2.7.0
PORTVERSION= 2.7.2
CATEGORIES+= mail tk84
MASTER_SITES= ftp://ftp.tcl.tk/pub/tcl/%SUBDIR%/
MASTER_SITES+= ${MASTER_SITE_SOURCEFORGE}

View File

@ -1,2 +1,2 @@
MD5 (exmh-2.7.0.tar.gz) = 513f6cd11cbb0f35ee179ebe1a1475a8
SIZE (exmh-2.7.0.tar.gz) = 1061945
MD5 (exmh-2.7.2.tar.gz) = fdb7c6ff26d0429ea950590a36f1369f
SIZE (exmh-2.7.2.tar.gz) = 1081601

View File

@ -0,0 +1,25 @@
--- 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 &

View File

@ -0,0 +1,11 @@
--- 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 {

View File

@ -0,0 +1,13 @@
--- 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"

View File

@ -158,6 +158,7 @@ lib/exmh-%%EXMH_VERSION%%/mbuntidy.bitmap
lib/exmh-%%EXMH_VERSION%%/mh.tcl
lib/exmh-%%EXMH_VERSION%%/mime.tcl
lib/exmh-%%EXMH_VERSION%%/mime.types
lib/exmh-%%EXMH_VERSION%%/mimencode.tcl
lib/exmh-%%EXMH_VERSION%%/mimeSun.tcl
lib/exmh-%%EXMH_VERSION%%/mosaic.tcl
lib/exmh-%%EXMH_VERSION%%/msg.tcl