[rkward-cvs] SF.net SVN: rkward:[3729] trunk/rkward/rkward/rbackend/rpackages/rkwarddev
m-eik at users.sourceforge.net
m-eik at users.sourceforge.net
Wed Sep 7 08:05:00 UTC 2011
Revision: 3729
http://rkward.svn.sourceforge.net/rkward/?rev=3729&view=rev
Author: m-eik
Date: 2011-09-07 08:04:59 +0000 (Wed, 07 Sep 2011)
Log Message:
-----------
rkwarddev: added some more missing XML functions (need some more testing)
Modified Paths:
--------------
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/ChangeLog
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/DESCRIPTION
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/NAMESPACE
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk-internal.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.cbox.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.dropdown.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.frame.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.radio.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.tabbook.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.vars.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rkwarddev-package.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rkwarddev-package.Rd
Added Paths:
-----------
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.browser.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.input.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.saveobj.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.stretch.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.text.R
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.browser.Rd
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.input.Rd
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.saveobj.Rd
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.stretch.Rd
trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.text.Rd
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/ChangeLog
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/ChangeLog 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/ChangeLog 2011-09-07 08:04:59 UTC (rev 3729)
@@ -2,6 +2,7 @@
## 0.01-1 (2011-09-05)
- added rk.JS.scan(), rk.JS.doc(), rk.JS.array(), rk.rkh.scan() and rk.rkh.doc()
+ - added rk.XML.browser(), rk.XML.input(), rk.XML.saveobj(), rk.XML.stretch() and rk.XML.text()
- shortened package name from "rkwardplugdev" to "rkwarddev"
- merged code into RKWard's svn tree
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/DESCRIPTION
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/DESCRIPTION 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/DESCRIPTION 2011-09-07 08:04:59 UTC (rev 3729)
@@ -16,7 +16,7 @@
Author at R: c(person(given="Meik", family="Michalke",
email="meik.michalke at hhu.de"))
Version: 0.01-1
-Date: 2011-09-05
+Date: 2011-09-06
Collate:
'rk-internal.R'
'rk.JS.array.R'
@@ -28,13 +28,18 @@
'rkwarddev-desc-internal.R'
'rkwarddev-package.R'
'rk.XML.about.R'
+ 'rk.XML.browser.R'
'rk.XML.cbox.R'
'rk.XML.col.R'
'rk.XML.dropdown.R'
'rk.XML.frame.R'
+ 'rk.XML.input.R'
'rk.XML.pluginmap.R'
'rk.XML.plugin.R'
'rk.XML.radio.R'
'rk.XML.row.R'
+ 'rk.XML.saveobj.R'
+ 'rk.XML.stretch.R'
'rk.XML.tabbook.R'
+ 'rk.XML.text.R'
'rk.XML.vars.R'
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/NAMESPACE
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/NAMESPACE 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/NAMESPACE 2011-09-07 08:04:59 UTC (rev 3729)
@@ -5,13 +5,18 @@
export(rk.rkh.doc)
export(rk.rkh.scan)
export(rk.XML.about)
+export(rk.XML.browser)
export(rk.XML.cbox)
export(rk.XML.col)
export(rk.XML.dropdown)
export(rk.XML.frame)
+export(rk.XML.input)
export(rk.XML.plugin)
export(rk.XML.pluginmap)
export(rk.XML.radio)
export(rk.XML.row)
+export(rk.XML.saveobj)
+export(rk.XML.stretch)
export(rk.XML.tabbook)
+export(rk.XML.text)
export(rk.XML.vars)
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk-internal.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk-internal.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk-internal.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -1,13 +1,13 @@
# internal functions for the rk.* functions
-auto.ids <- function(identifiers, prefix=NULL, chars=8){
+auto.ids <- function(identifiers, prefix=NULL, suffix=NULL, chars=8){
identifiers <- gsub("[[:space:]]*[^[:alnum:]]*", "", identifiers)
id.names <- ifelse(nchar(identifiers) > 8, abbreviate(identifiers, minlength=chars), identifiers)
# check for uniqueness
if(any(duplicated(id.names))){
warning("IDs are not unique, please check!")
} else {}
- ids <- paste(prefix, id.names, sep="")
+ ids <- paste(prefix, id.names, suffix, sep="")
return(ids)
}
@@ -62,8 +62,7 @@
this.tag.name <- XiMpLe:::XML.tagName(this.tag)
this.tag.id <- XiMpLe:::parseXMLAttr(this.tag)[["id"]]
if(isTRUE(add.abbrev)){
- this.tag.abbrev <- abbreviate(this.tag.name, minlength=3, strict=TRUE)
- this.tag.id.abbrev <- paste(this.tag.abbrev, ".", this.tag.id, sep="")
+ this.tag.id.abbrev <- paste(ID.prefix(this.tag.name), this.tag.id, sep="")
} else {
this.tag.id.abbrev <- this.tag.id
}
@@ -116,3 +115,17 @@
}
return(results)
} ## function get.JS.vars()
+
+## function ID.prefix()
+ID.prefix <- function(initial, abbr=TRUE, length=3, dot=TRUE){
+ if(isTRUE(abbr)){
+ prfx <- abbreviate(initial, minlength=length, strict=TRUE)
+ } else {
+ # currently empty, but can later be used to define fixed abbreviations
+ prfx <- NULL
+ }
+ if(isTRUE(dot)){
+ prfx <- paste(prfx, ".", sep="")
+ } else {}
+ return(prfx)
+}
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.browser.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.browser.R (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.browser.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,30 @@
+#' Create XML node "browser" for RKWard plugins
+#'
+#' @param label Character string, a text label for this plugin element.
+#' @param dir Logical, if \code{TRUE} type of object browser defaults to "dir", otherwise "file".
+#' @param id.name Character string, a unique ID for this plugin element.
+#' If \code{"auto"} and a label was provided, an ID will be generated automatically from the label.
+#' @return An object of class \code{XiMpLe.node}.
+#' @export
+
+rk.XML.browser <- function(label, dir=TRUE, id.name="auto"){
+ attr.list <- list(label=label)
+
+ if(isTRUE(dir)){
+ attr.list[["type"]] <- "dir"
+ } else {
+ attr.list[["type"]] <- "file"
+ }
+
+ if(identical(id.name, "auto")){
+ attr.list[["id"]] <- list(id=auto.ids(label, prefix=ID.prefix("browser")))
+ } else if(!is.null(id.name)){
+ attr.list[["id"]] <- id.name
+ } else {}
+
+ node <- new("XiMpLe.node",
+ name="browser",
+ attributes=attr.list)
+
+ return(node)
+}
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.cbox.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.cbox.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.cbox.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -10,7 +10,7 @@
rk.XML.cbox <- function(label, val, chk=FALSE, id.name="auto"){
if(identical(id.name, "auto")){
- id <- auto.ids(label, prefix="chk.")
+ id <- auto.ids(label, prefix=ID.prefix("checkbox"))
} else {
id <- id.name
}
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.dropdown.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.dropdown.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.dropdown.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -26,7 +26,7 @@
})
if(identical(id.name, "auto")){
- id <- auto.ids(label, prefix="drp.")
+ id <- auto.ids(label, prefix=ID.prefix("dropdown"))
} else {
id <- id.name
}
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.frame.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.frame.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.frame.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -12,7 +12,7 @@
if(!is.null(label)){
attr.list <- list(label=label)
if(identical(id.name, "auto")){
- attr.list[["id"]] <- list(id=auto.ids(label, prefix="frm."))
+ attr.list[["id"]] <- list(id=auto.ids(label, prefix=ID.prefix("frame")))
} else if(!is.null(id.name)){
attr.list[["id"]] <- id.name
} else {}
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.input.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.input.R (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.input.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,24 @@
+#' Create XML node "input" for RKWard plugins
+#'
+#' @param label Character string, a text label for this plugin element.
+#' @param id.name Character string, a unique ID for this plugin element.
+#' If \code{"auto"}, an ID will be generated automatically from the label.
+#' @return An object of class \code{XiMpLe.node}.
+#' @export
+
+#<input id="inpCelexRunWd" label="Number of running words" />
+rk.XML.input <- function(label, id.name="auto"){
+ attr.list <- list(label=label)
+
+ if(identical(id.name, "auto")){
+ attr.list[["id"]] <- list(id=auto.ids(label, prefix=ID.prefix("input")))
+ } else if(!is.null(id.name)){
+ attr.list[["id"]] <- id.name
+ } else {}
+
+ node <- new("XiMpLe.node",
+ name="input",
+ attributes=attr.list)
+
+ return(node)
+}
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.radio.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.radio.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.radio.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -26,7 +26,7 @@
})
if(identical(id.name, "auto")){
- id <- auto.ids(label, prefix="rad.")
+ id <- auto.ids(label, prefix=ID.prefix("radio"))
} else {
id <- id.name
}
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.saveobj.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.saveobj.R (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.saveobj.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,43 @@
+#' Create XML node "saveobject" for RKWard plugins
+#'
+#' @param label Character string, a text label for this plugin element.
+#' @param chk Logical, if \code{TRUE} and \code{checkable=TRUE} the option is checkable and active by default.
+#' @param checkable Logical, if \code{TRUE} the option can be switched on and off.
+#' @param intitial Character string, the default name for the object should be saved to.
+#' If \code{"auto"} and a label was provided, an name will be generated automatically from the label.
+#' @param id.name Character string, a unique ID for this plugin element.
+#' If \code{"auto"} and a label was provided, an ID will be generated automatically from the label.
+#' @return An object of class \code{XiMpLe.node}.
+#' @export
+
+rk.XML.saveobj <- function(label, chk=FALSE, checkable=TRUE, initial="auto", id.name="auto"){
+ attr.list <- list(label=label)
+
+ if(isTRUE(checkable)){
+ attr.list[["checkable"]] <- "true"
+ if(isTRUE(chk)){
+ attr.list[["checked"]] <- "true"
+ } else {}
+ } else {
+ attr.list[["checkable"]] <- "false"
+ }
+
+ if(identical(initial, "auto")){
+ attr.list[["initial"]] <- auto.ids(label, suffix=".obj")
+ } else if(!is.null(id.name)){
+ attr.list[["initial"]] <- initial
+ } else {}
+
+
+ if(identical(id.name, "auto")){
+ attr.list[["id"]] <- list(id=auto.ids(label, prefix=ID.prefix("saveobject")))
+ } else if(!is.null(id.name)){
+ attr.list[["id"]] <- id.name
+ } else {}
+
+ node <- new("XiMpLe.node",
+ name="saveobject",
+ attributes=attr.list)
+
+ return(node)
+}
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.stretch.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.stretch.R (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.stretch.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,9 @@
+#' Create XML empty node "stretch" for RKWard plugins
+#'
+#' @return An object of class \code{XiMpLe.node}.
+#' @export
+
+#<stretch />
+rk.XML.stretch <- function(){
+ return(new("XiMpLe.node", name="stretch"))
+}
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.tabbook.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.tabbook.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.tabbook.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -23,7 +23,7 @@
}
if(identical(id.name, "auto")){
- tab.ids <- auto.ids(tab.labels, prefix="tab.")
+ tab.ids <- auto.ids(tab.labels, prefix=ID.prefix("tabbook"))
} else {}
tabs <- sapply(1:num.tabs, function(this.num){
this.tab <- tab.labels[[this.num]]
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.text.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.text.R (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.text.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,21 @@
+#' Create XML node "text" for RKWard plugins
+#'
+#' @param id.name Character string, a unique ID for this plugin element.
+#' @return An object of class \code{XiMpLe.node}.
+#' @export
+
+#<text id="TTtext">The TreeTagger folder is the one containing the bin, cmd and lib folders</text>
+rk.XML.text <- function(text, id.name=NULL){
+ if(!is.null(id.name)){
+ attr.list <- list(id=id.name)
+ } else {
+ attr.list <- list()
+ }
+
+ node <- new("XiMpLe.node",
+ name="text",
+ attributes=attr.list,
+ value=text)
+
+ return(node)
+}
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.vars.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.vars.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rk.XML.vars.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -15,8 +15,8 @@
rk.XML.vars <- function(label, slot.text=NULL, classes=NULL, horiz=TRUE, id.name="auto"){
if(identical(id.name, "auto")){
- var.sel.attr <- list(id=auto.ids(label, prefix="var."))
- var.slot.attr <- list(id=auto.ids(label, prefix="vars."))
+ var.sel.attr <- list(id=auto.ids(label, prefix=ID.prefix("varselector", length=3)))
+ var.slot.attr <- list(id=auto.ids(label, prefix=ID.prefix("varslot", length=4)))
} else if(!is.null(id.name)){
var.sel.attr <- list(id=id.name[[2]])
var.slot.attr <- list(id=id.name[[3]])
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rkwarddev-package.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rkwarddev-package.R 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/R/rkwarddev-package.R 2011-09-07 08:04:59 UTC (rev 3729)
@@ -4,7 +4,7 @@
#' Package: \tab rkwarddev\cr
#' Type: \tab Package\cr
#' Version: \tab 0.01-1\cr
-#' Date: \tab 2011-09-05\cr
+#' Date: \tab 2011-09-06\cr
#' Depends: \tab R (>= 2.9.0), XiMpLe\cr
#' Enhances: \tab rkward\cr
#' Encoding: \tab UTF-8\cr
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.browser.Rd
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.browser.Rd (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.browser.Rd 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,25 @@
+\name{rk.XML.browser}
+\alias{rk.XML.browser}
+\title{Create XML node "browser" for RKWard plugins}
+\usage{
+ rk.XML.browser(label, dir = TRUE, id.name = "auto")
+}
+\arguments{
+ \item{label}{Character string, a text label for this
+ plugin element.}
+
+ \item{dir}{Logical, if \code{TRUE} type of object browser
+ defaults to "dir", otherwise "file".}
+
+ \item{id.name}{Character string, a unique ID for this
+ plugin element. If \code{"auto"} and a label was
+ provided, an ID will be generated automatically from the
+ label.}
+}
+\value{
+ An object of class \code{XiMpLe.node}.
+}
+\description{
+ Create XML node "browser" for RKWard plugins
+}
+
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.input.Rd
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.input.Rd (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.input.Rd 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,21 @@
+\name{rk.XML.input}
+\alias{rk.XML.input}
+\title{Create XML node "input" for RKWard plugins}
+\usage{
+ rk.XML.input(label, id.name = "auto")
+}
+\arguments{
+ \item{label}{Character string, a text label for this
+ plugin element.}
+
+ \item{id.name}{Character string, a unique ID for this
+ plugin element. If \code{"auto"}, an ID will be generated
+ automatically from the label.}
+}
+\value{
+ An object of class \code{XiMpLe.node}.
+}
+\description{
+ Create XML node "input" for RKWard plugins
+}
+
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.saveobj.Rd
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.saveobj.Rd (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.saveobj.Rd 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,35 @@
+\name{rk.XML.saveobj}
+\alias{rk.XML.saveobj}
+\title{Create XML node "saveobject" for RKWard plugins}
+\usage{
+ rk.XML.saveobj(label, chk = FALSE, checkable = TRUE,
+ initial = "auto", id.name = "auto")
+}
+\arguments{
+ \item{label}{Character string, a text label for this
+ plugin element.}
+
+ \item{chk}{Logical, if \code{TRUE} and
+ \code{checkable=TRUE} the option is checkable and active
+ by default.}
+
+ \item{checkable}{Logical, if \code{TRUE} the option can
+ be switched on and off.}
+
+ \item{intitial}{Character string, the default name for
+ the object should be saved to. If \code{"auto"} and a
+ label was provided, an name will be generated
+ automatically from the label.}
+
+ \item{id.name}{Character string, a unique ID for this
+ plugin element. If \code{"auto"} and a label was
+ provided, an ID will be generated automatically from the
+ label.}
+}
+\value{
+ An object of class \code{XiMpLe.node}.
+}
+\description{
+ Create XML node "saveobject" for RKWard plugins
+}
+
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.stretch.Rd
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.stretch.Rd (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.stretch.Rd 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,10 @@
+\name{rk.XML.stretch}
+\alias{rk.XML.stretch}
+\title{Create XML empty node "stretch" for RKWard plugins}
+\value{
+ An object of class \code{XiMpLe.node}.
+}
+\description{
+ Create XML empty node "stretch" for RKWard plugins
+}
+
Added: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.text.Rd
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.text.Rd (rev 0)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rk.XML.text.Rd 2011-09-07 08:04:59 UTC (rev 3729)
@@ -0,0 +1,17 @@
+\name{rk.XML.text}
+\alias{rk.XML.text}
+\title{Create XML node "text" for RKWard plugins}
+\usage{
+ rk.XML.text(text, id.name = NULL)
+}
+\arguments{
+ \item{id.name}{Character string, a unique ID for this
+ plugin element.}
+}
+\value{
+ An object of class \code{XiMpLe.node}.
+}
+\description{
+ Create XML node "text" for RKWard plugins
+}
+
Modified: trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rkwarddev-package.Rd
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rkwarddev-package.Rd 2011-09-05 16:41:17 UTC (rev 3728)
+++ trunk/rkward/rkward/rbackend/rpackages/rkwarddev/man/rkwarddev-package.Rd 2011-09-07 08:04:59 UTC (rev 3729)
@@ -10,7 +10,7 @@
\details{
\tabular{ll}{ Package: \tab rkwarddev\cr Type: \tab
Package\cr Version: \tab 0.01-1\cr Date: \tab
- 2011-09-05\cr Depends: \tab R (>= 2.9.0), XiMpLe\cr
+ 2011-09-06\cr Depends: \tab R (>= 2.9.0), XiMpLe\cr
Enhances: \tab rkward\cr Encoding: \tab UTF-8\cr License:
\tab GPL (>= 3)\cr LazyLoad: \tab yes\cr URL: \tab
http://rkward.sourceforge.net\cr }
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