SCM

SCM Repository

[tm] Diff of /trunk/R/textmin/R/textrepo.R
ViewVC logotype

Diff of /trunk/R/textmin/R/textrepo.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 62, Tue Oct 24 10:08:58 2006 UTC revision 68, Thu Nov 2 14:06:42 2006 UTC
# Line 9  Line 9 
9                return(tr)                return(tr)
10            })            })
11    
12  setMethod("attachData",  setMethod("attach_data",
13            signature(object = "TextRepository", data = "TextDocCol"),            signature(object = "TextRepository", data = "TextDocCol"),
14            function(object, data) {            function(object, data) {
15                object@.Data <- as(c(object@.Data, data), "TextRepository")                object[[length(object)+1]] <- data
16                return(object)                return(object)
17            })            })
18    
19  setMethod("attachMetaData",  setMethod("attach_metadata",
20            signature(object = "TextRepository"),            signature(object = "TextRepository"),
21            function(object, name, metadata) {            function(object, name, metadata) {
22                object@RepresentationMetaData <- c(object@RepresentationMetaData, new = list(metadata))                object@RepresentationMetaData <- c(object@RepresentationMetaData, new = list(metadata))

Legend:
Removed from v.62  
changed lines
  Added in v.68

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge