R help - Apr 2014 - Error using the package tm.plugin.webmining "object '.Source' not found"

I recently had an issue while trying to use the package tm.plugin.webmining.

I was able to get a hack to work for me and I wanted to share the diff and
bring this to someones attention.
Or what is the proper way to report a bug for third party code?

Cheers

##### error I get when using the plugin. #####
Error in get(name, envir = asNamespace(pkg), inherits = FALSE) :
  object '.Source' not found

##### My Hack Diff #####
diff ~/Downloads/tm.plugin.webmining/R/source.R \
> tm.plugin.webmining/R/source.R
35c35,36
<  s <- tm:::.Source(NULL, encoding, length(content_parsed), FALSE, NULL,
0, vectorized, class = class)
---
>  s <- tm:::Source(defaultReader=readPlain, encoding=encoding,
length=length(content_parsed),
>   names=NA_character_, position=0, vectorized=vectorized, class=class)
<
569,570c570,572
<  s <- tm:::.Source(NULL, encoding = "UTF-8", length(content),
FALSE,
NULL, 0, vectorized = FALSE, class = "WebXMLSource")
<  s$Content <- content
---
>  s <- tm:::Source(defaultReader=readPlain, encoding="UTF-8",
length=length(content),
>   names=NA_character_, position=0, vectorized=FALSE,
class="WebXMLSource")

Using R version 3.1.0 beta (2014-03-28 r65330) -- "Spring Dance"

##### output from console ######
> library(quantmod)
Loading required package: Defaults
Loading required package: xts
Loading required package: zoo

Attaching package: 'zoo'

The following objects are masked from 'package:base':

    as.Date, as.Date.numeric

Loading required package: TTR
Version 0.4-0 included new data defaults. See
?getSymbols.
> library(rJava)
> library(boilerpipeR)
> library(namespace)
> library(tm.plugin.webmining)
Loading required package: tm
Loading required package: RCurl
Loading required package: bitops

Attaching package: 'RCurl'

The following object is masked from 'package:rJava':

    clone

Loading required package: XML

Attaching package: 'tm.plugin.webmining'

The following object is masked from 'package:RCurl':

    getURL

The following object is masked from 'package:base':

    parse
>
> corpus <- WebCorpus(GoogleFinanceSource("NASDAQ:MSFT"))
Error in get(name, envir = asNamespace(pkg), inherits = FALSE) :
  object '.Source' not found

	[[alternative HTML version deleted]]

Le dimanche 13 avril 2014 ? 20:50 -0400, brian arb a ?crit
:
> I recently had an issue while trying to use the package
tm.plugin.webmining.
> 
> I was able to get a hack to work for me and I wanted to share the diff and
> bring this to someones attention.
> Or what is the proper way to report a bug for third party code?
You should contact the maintainer of the package. Apparently this
package was using tm's internal function .Source(), which was renamed
into Source() in tm 0.5-10.

You can likely work around this by defining this function first:
.Source <- function(defaultreader, encoding, length, lodsupport, names,
position, vectorized, class = NULL) {
    if (vectorized && (length <= 0))
        stop("vectorized sources must have positive length")

    if (!is.null(names) && (length != length(names)))
        stop("incorrect number of element names")

    structure(list(DefaultReader = defaultreader, Encoding = encoding,
Length = length,
                   LoDSupport = lodsupport, Names = names, Position position,
Vectorized = vectorized),
              class = unique(c(class, "Source")))
}

If this doesn't work, you can install an older version of tm
(see http://cran.r-project.org/src/contrib/Archive/tm/).

Regards
> Cheers
> 
> ##### error I get when using the plugin. #####
> Error in get(name, envir = asNamespace(pkg), inherits = FALSE) :
>   object '.Source' not found
> 
> ##### My Hack Diff #####
> diff ~/Downloads/tm.plugin.webmining/R/source.R \
> > tm.plugin.webmining/R/source.R
> 35c35,36
> <  s <- tm:::.Source(NULL, encoding, length(content_parsed), FALSE,
NULL,
> 0, vectorized, class = class)
> ---
> >  s <- tm:::Source(defaultReader=readPlain, encoding=encoding,
> length=length(content_parsed),
> >   names=NA_character_, position=0, vectorized=vectorized, class=class)
> <
> 569,570c570,572
> <  s <- tm:::.Source(NULL, encoding = "UTF-8",
length(content), FALSE,
> NULL, 0, vectorized = FALSE, class = "WebXMLSource")
> <  s$Content <- content
> ---
> >  s <- tm:::Source(defaultReader=readPlain,
encoding="UTF-8",
> length=length(content),
> >   names=NA_character_, position=0, vectorized=FALSE,
class="WebXMLSource")
> 
> 
> Using R version 3.1.0 beta (2014-03-28 r65330) -- "Spring Dance"
> 
> ##### output from console ######
> 
> > library(quantmod)
> Loading required package: Defaults
> Loading required package: xts
> Loading required package: zoo
> 
> Attaching package: 'zoo'
> 
> The following objects are masked from 'package:base':
> 
>     as.Date, as.Date.numeric
> 
> Loading required package: TTR
> Version 0.4-0 included new data defaults. See ?getSymbols.
> > library(rJava)
> > library(boilerpipeR)
> > library(namespace)
> > library(tm.plugin.webmining)
> Loading required package: tm
> Loading required package: RCurl
> Loading required package: bitops
> 
> Attaching package: 'RCurl'
> 
> The following object is masked from 'package:rJava':
> 
>     clone
> 
> Loading required package: XML
> 
> Attaching package: 'tm.plugin.webmining'
> 
> The following object is masked from 'package:RCurl':
> 
>     getURL
> 
> The following object is masked from 'package:base':
> 
>     parse
> 
> >
> > corpus <- WebCorpus(GoogleFinanceSource("NASDAQ:MSFT"))
> Error in get(name, envir = asNamespace(pkg), inherits = FALSE) :
>   object '.Source' not found
> 
> 	[[alternative HTML version deleted]]
> 
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.