[Roxygen-commits] r75 - in pkg: . R

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

Author: pcd
Date: 2008-07-22 20:29:01 +0200 (Tue, 22 Jul 2008)
New Revision: 75

Modified:
   pkg/DESCRIPTION
   pkg/R/collate.R
Log:
debug raus; honest collate field


Modified: pkg/DESCRIPTION
===================================================================
--- pkg/DESCRIPTION	2008-07-22 18:28:50 UTC (rev 74)
+++ pkg/DESCRIPTION	2008-07-22 18:29:01 UTC (rev 75)
@@ -7,4 +7,4 @@
         Manuel Eugster <Manuel.Eugster at stat.uni-muenchen.de>
 Maintainer: Peter Danenberg <r-forge at wikitex.org>
 URL: http://roxygen.org
-Collate: list.R string.R functional.R parse.R roclet.R collate.R namespace.R Rd.R
+Collate: functional.R string.R parse.R collate.R list.R roclet.R namespace.R Rd.R

Modified: pkg/R/collate.R
===================================================================
--- pkg/R/collate.R	2008-07-22 18:28:50 UTC (rev 74)
+++ pkg/R/collate.R	2008-07-22 18:29:01 UTC (rev 75)
@@ -57,12 +57,10 @@
   topological.sort <- function(vertices) {
     sorted <- NULL
     visit <- function(predecessor) {
-      debug(visit=predecessor$file)
       predecessor$discovered <- TRUE
       for (ancestor in predecessor$ancestors)
         if (!ancestor$discovered)
           visit(ancestor)
-      debug(finish=predecessor$file)
       assign.parent('sorted',
                     append(sorted, predecessor),
                     environment())
@@ -73,7 +71,7 @@
   }
 
   post.files <-
-    function() cat('collate',
+    function() cat('Collate:',
                    Reduce.paste(function(vertex) vertex$file,
                                 topological.sort(vertices),
                                 ' '),