[Genabel-commits] r746 - pkg/GenABEL/R

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

Author: lckarssen
Date: 2011-07-05 14:03:35 +0200 (Tue, 05 Jul 2011)
New Revision: 746

Modified:
   pkg/GenABEL/R/export.merlin.R
Log:
Fix two small typos in error messages.

Modified: pkg/GenABEL/R/export.merlin.R
===================================================================
--- pkg/GenABEL/R/export.merlin.R	2011-06-28 13:29:27 UTC (rev 745)
+++ pkg/GenABEL/R/export.merlin.R	2011-07-05 12:03:35 UTC (rev 746)
@@ -2,10 +2,10 @@
 function(data,pedfile="merlin.ped",datafile="merlin.dat",
 		mapfile="merlin.map",format="merlin",fixstrand="no",
 		extendedmap=TRUE,traits=1, order = TRUE, stepids = 100) {
-	if (!is(data,"gwaa.data")) stop("Data argumet should be of gwaa.data-class")
+	if (!is(data,"gwaa.data")) stop("Data argument should be of gwaa.data-class")
 	formats <- c("merlin","plink")
 	if (!(match(format,formats,nomatch=0)>0)) {
-		out <- paste("fromat argument should be one of",formats,"\n")
+		out <- paste("format argument should be one of",formats,"\n")
 		stop(out)
 	}
 	fixes <- c("no","+","-")