[PD-cvs] pd/src u_main.tk,1.1.1.4.2.7.4.32,1.1.1.4.2.7.4.33

[Mathieu Bouchard]

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

Modified Files:
      Tag: impd_0_37
	u_main.tk 
Log Message:
oops.


Index: u_main.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/u_main.tk,v
retrieving revision 1.1.1.4.2.7.4.32
retrieving revision 1.1.1.4.2.7.4.33
diff -C2 -d -r1.1.1.4.2.7.4.32 -r1.1.1.4.2.7.4.33
*** u_main.tk	3 Apr 2004 14:24:12 -0000	1.1.1.4.2.7.4.32
--- u_main.tk	3 Apr 2004 14:28:15 -0000	1.1.1.4.2.7.4.33
***************
*** 2344,2349 ****
  proc pdrc_write {self} {
  	global pdrc_options pdrc_options_h _ cmdline
! 	#set fd [open $cmdline($rcfilename) w]
! 	set fd stderr
  	foreach {type name desc} $pdrc_options {
  		set v $_($self:$name)
--- 2344,2348 ----
  proc pdrc_write {self} {
  	global pdrc_options pdrc_options_h _ cmdline
! 	set fd [open $cmdline(rcfilename) w]
  	foreach {type name desc} $pdrc_options {
  		set v $_($self:$name)
***************
*** 2356,2360 ****
  		}
  	}
! 	#close $fd
  }
  
--- 2355,2359 ----
  		}
  	}
! 	close $fd
  }