[rkward-cvs] SF.net SVN: rkward:[3910] trunk/rkward/packages/rkwarddev

m-eik at users.sourceforge.net m-eik at users.sourceforge.net
Sat Oct 8 12:29:56 UTC 2011


Revision: 3910
          http://rkward.svn.sourceforge.net/rkward/?rev=3910&view=rev
Author:   m-eik
Date:     2011-10-08 12:29:55 +0000 (Sat, 08 Oct 2011)
Log Message:
-----------
rkwarddev: adjusted id() default values

Modified Paths:
--------------
    trunk/rkward/packages/rkwarddev/R/id.R
    trunk/rkward/packages/rkwarddev/man/id.Rd

Modified: trunk/rkward/packages/rkwarddev/R/id.R
===================================================================
--- trunk/rkward/packages/rkwarddev/R/id.R	2011-10-08 12:29:12 UTC (rev 3909)
+++ trunk/rkward/packages/rkwarddev/R/id.R	2011-10-08 12:29:55 UTC (rev 3910)
@@ -23,9 +23,9 @@
 #' @examples
 #' # an example checkbox XML node
 #' cbox1 <- rk.XML.cbox(label="foo", value="foo1", id.name="CheckboxFoo.ID")
-#' id("The variable name is: ", cbox1, "!", js=TRUE)
+#' id("The variable name is: ", cbox1, "!")
 
-id <- function(..., quote=FALSE, collapse="", js=FALSE){
+id <- function(..., quote=FALSE, collapse="", js=TRUE){
 	full.content <- list(...)
 	ID.content <- sapply(full.content, function(this.part){
 			if(inherits(this.part, "XiMpLe.node")){

Modified: trunk/rkward/packages/rkwarddev/man/id.Rd
===================================================================
--- trunk/rkward/packages/rkwarddev/man/id.Rd	2011-10-08 12:29:12 UTC (rev 3909)
+++ trunk/rkward/packages/rkwarddev/man/id.Rd	2011-10-08 12:29:55 UTC (rev 3910)
@@ -2,7 +2,7 @@
 \alias{id}
 \title{Replace XiMpLe.node objects with their ID value}
 \usage{
-  id(..., quote = FALSE, collapse = "", js = FALSE)
+  id(..., quote = FALSE, collapse = "", js = TRUE)
 }
 \arguments{
   \item{...}{One or several character strings and/or
@@ -36,7 +36,7 @@
 \examples{
 # an example checkbox XML node
 cbox1 <- rk.XML.cbox(label="foo", value="foo1", id.name="CheckboxFoo.ID")
-id("The variable name is: ", cbox1, "!", js=TRUE)
+id("The variable name is: ", cbox1, "!")
 }
 \seealso{
   \code{\link[rkwarddev:rk.JS.vars]{rk.JS.vars}},

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.





More information about the rkward-tracker mailing list