[Seqinr-commits] r1867 - pkg/man

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

Author: jeanlobry
Date: 2016-06-01 19:29:23 +0200 (Wed, 01 Jun 2016)
New Revision: 1867

Modified:
   pkg/man/acnucopen.Rd
Log:
504 is expected for SUBINLNG in emblTP

Modified: pkg/man/acnucopen.Rd
===================================================================
--- pkg/man/acnucopen.Rd	2016-06-01 16:02:10 UTC (rev 1866)
+++ pkg/man/acnucopen.Rd	2016-06-01 17:29:23 UTC (rev 1867)
@@ -54,7 +54,7 @@
   readLines(mysocket, n = 1) # OK acnuc socket started
   acnucopen("emblTP", socket = mysocket) -> res
   expected <- c("EMBL", "14138095", "236401", "1186228", "8", 
-    "16", "40", "40", "20", "20", "40", "60", "63")
+    "16", "40", "40", "20", "20", "40", "60", "504")
   stopifnot(all(unlist(res) == expected))
   tryalreadyopen <- try(acnucopen("emblTP", socket = mysocket))
   stopifnot(inherits(tryalreadyopen, "try-error"))