mirror of
https://git.freebsd.org/ports.git
synced 2025-06-04 04:16:27 -04:00
- add autoresume patch
This commit is contained in:
parent
3d246ede7a
commit
16aa9b8b34
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=102850
2 changed files with 19 additions and 0 deletions
|
@ -7,6 +7,7 @@
|
|||
|
||||
PORTNAME= zircon
|
||||
PORTVERSION= 1.18.256
|
||||
PORTREVISION= 1
|
||||
CATEGORIES= irc tk84
|
||||
MASTER_SITES= ftp://catless.ncl.ac.uk/pub/ \
|
||||
${MASTER_SITE_LOCAL}
|
||||
|
|
18
irc/zircon/files/patch-dcc.tcl
Normal file
18
irc/zircon/files/patch-dcc.tcl
Normal file
|
@ -0,0 +1,18 @@
|
|||
--- plugins/Dcc/dcc.tcl.orig Tue Jul 10 17:40:00 2001
|
||||
+++ plugins/Dcc/dcc.tcl Wed Mar 3 04:24:11 2004
|
||||
@@ -46,6 +46,15 @@
|
||||
return 0
|
||||
}
|
||||
switch $posn [set fp [file size $file]] {} default {
|
||||
+ foreach x [$net autoget] {
|
||||
+ if {[regexp -- $x $usr]} {
|
||||
+ $net CTCP DCC [$usr name] "RESUME [deSpace [file tail $file]] $port $fp"
|
||||
+ global Resume
|
||||
+ if {![info exists Resume($usr)]} {$usr ref}
|
||||
+ lappend Resume($usr) [list $file $addr $port $leng $fp]
|
||||
+ return 0
|
||||
+ }
|
||||
+ }
|
||||
switch [tk_dialog .@dg$net {DCC Get} \
|
||||
"File \"$file\" already exists. Select the action you want to take." \
|
||||
warning 0 Overwrite Resume {Rename incoming} \
|
Loading…
Add table
Reference in a new issue