[Distr-commits] r830 - branches/distr-2.4/pkg/SweaveListingUtils/R

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

Author: ruckdeschel
Date: 2013-01-07 18:16:30 +0100 (Mon, 07 Jan 2013)
New Revision: 830

Modified:
   branches/distr-2.4/pkg/SweaveListingUtils/R/keywordsStyle.R
Log:
SweaveListingUtils: falsche Argumentstruktur in library() gefixt

Modified: branches/distr-2.4/pkg/SweaveListingUtils/R/keywordsStyle.R
===================================================================
--- branches/distr-2.4/pkg/SweaveListingUtils/R/keywordsStyle.R	2012-09-27 18:27:09 UTC (rev 829)
+++ branches/distr-2.4/pkg/SweaveListingUtils/R/keywordsStyle.R	2013-01-07 17:16:30 UTC (rev 830)
@@ -169,7 +169,7 @@
 require <- function(package, lib.loc = NULL, quietly = FALSE,
              warn.conflicts = TRUE,
              keep.source = getOption("keep.source.pkgs"),
-             character.only = FALSE, version, save = TRUE, inSweave,
+             character.only = FALSE, save = TRUE, inSweave,
              keywordstyles, interm.keywordstyles, overwrite, intermediate){
              pkg <- as.character(substitute(package))
              mc <- as.list(match.call(expand.dots = FALSE))[-1]
@@ -180,8 +180,8 @@
 library <- function(package, help, pos = 2, lib.loc = NULL,
     character.only = FALSE,
     logical.return = FALSE, warn.conflicts = TRUE,
-    keep.source = getOption("keep.source.pkgs"),
-    verbose = getOption("verbose"), version, inSweave,
+    quietly = FALSE, keep.source = getOption("keep.source.pkgs"),
+    verbose = getOption("verbose"), inSweave,
     keywordstyles, interm.keywordstyles, overwrite, intermediate){
              pkg <- as.character(substitute(package))
              mc <- as.list(match.call(expand.dots = FALSE))[-1]