[Forensim-help] r162 - pkg/R

[noreply at r-forge.r-project.org]

Author: hindahaned
Date: 2009-10-28 13:43:10 +0100 (Wed, 28 Oct 2009)
New Revision: 162

Modified:
   pkg/R/A2.simu.R
Log:
comment modification A2.simu function

Modified: pkg/R/A2.simu.R
===================================================================
--- pkg/R/A2.simu.R	2009-10-27 15:49:47 UTC (rev 161)
+++ pkg/R/A2.simu.R	2009-10-28 12:43:10 UTC (rev 162)
@@ -94,11 +94,9 @@
 	TFrame <- tkframe(tt, relief="groove")
 	labh <- tklabel(TFrame)
 	tkgrid(tklabel(TFrame,text="Two-allele model", font=font2, foreground="red"), labh)
-	#tkbind(labh, "<Button-1>", function() print(help("s.match")))
+	
 	tkpack(TFrame)
-	#
-	# Coordinates frame
-	#
+	
 	xy1.entry <- tkentry(xyframe, textvariable=xy1var, width=8)
 	xy2.entry <- tkentry(xyframe, textvariable=xy2var, width=8)