[PD-cvs] pd/src desire.tk,1.1.2.600.2.4,1.1.2.600.2.5

[Mathieu Bouchard]

Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16303

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
removed old socket code


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.4
retrieving revision 1.1.2.600.2.5
diff -C2 -d -r1.1.2.600.2.4 -r1.1.2.600.2.5
*** desire.tk	2 Dec 2006 23:48:28 -0000	1.1.2.600.2.4
--- desire.tk	3 Dec 2006 00:11:24 -0000	1.1.2.600.2.5
***************
*** 717,741 ****
  }
  
- # this is becoming obsolete (2006.12.01)
- proc accept_pd {s addr port} {
- 	global sock
- 	if {[llength $sock]==0} {
- 		set sock $s
- 		puts "accepting connection from pd kernel"
- 		fconfigure $sock -blocking 0 -buffering line
- 		poll_sock
- 		pd pd init
- 		foreach f $::files_to_open {
- 			set ff [file split [file normalize $f]]
- 			set ffl [llength $ff]
- 			set file [lindex $ff [expr $ffl-1]]
- 			set dir [join [lrange $ff 0 [expr $ffl-2]] [file separator]]
- 			pd pd open $file $dir
- 		}
- 	} {
- 		puts "WTF, two pd kernels for one gui?"
- 	}
- }
- 
  proc poll_gdb {} {
  	global gdb
--- 717,720 ----
***************
*** 785,789 ****
  
  set server_port 13666
- #set server_sock [socket -server accept_pd $server_port]
  after 1000 pd_connect
  
--- 764,767 ----