[Coxflexboost-commits] r14 - pkg/R

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

Author: hofner
Date: 2009-07-10 01:08:10 +0200 (Fri, 10 Jul 2009)
New Revision: 14

Modified:
   pkg/R/crossvalidation.R
Log:


Modified: pkg/R/crossvalidation.R
===================================================================
--- pkg/R/crossvalidation.R	2009-07-08 12:06:20 UTC (rev 13)
+++ pkg/R/crossvalidation.R	2009-07-09 23:08:10 UTC (rev 14)
@@ -19,7 +19,7 @@
     myapply <- lapply
     if (ctrl$parallel && require("multicore")) {
         if (!multicore:::isChild()) {
-            myapply <- mclapply
+            myapply <- multicore:::mclapply
             if (ctrl$trace) {
                 ctrl$trace <- FALSE
                 cat("\n Running in parallel with `trace = FALSE'\n")