aboutsummaryrefslogtreecommitdiffstats
path: root/finance/R-cran-RFinanceYJ
diff options
context:
space:
mode:
authortota <tota@FreeBSD.org>2014-05-25 16:55:32 +0800
committertota <tota@FreeBSD.org>2014-05-25 16:55:32 +0800
commit67a7c03da03e5d2d6888ef178d49a267bf714efc (patch)
tree096711d4c371160ca086afb4133129aa7f24e42e /finance/R-cran-RFinanceYJ
parentc882ca8d2f2a69ee23e72eda3bfb3944d031e8a8 (diff)
downloadfreebsd-ports-gnome-67a7c03da03e5d2d6888ef178d49a267bf714efc.tar.gz
freebsd-ports-gnome-67a7c03da03e5d2d6888ef178d49a267bf714efc.tar.zst
freebsd-ports-gnome-67a7c03da03e5d2d6888ef178d49a267bf714efc.zip
- Add a patch to fix the result of xmlRoot because of changing
the layout in May 2014 - Specify LICENSE BSD -> BSD3CLAUSE
Diffstat (limited to 'finance/R-cran-RFinanceYJ')
-rw-r--r--finance/R-cran-RFinanceYJ/Makefile4
-rw-r--r--finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R15
2 files changed, 17 insertions, 2 deletions
diff --git a/finance/R-cran-RFinanceYJ/Makefile b/finance/R-cran-RFinanceYJ/Makefile
index e5c5b6f5cf65..3bd3b175bad2 100644
--- a/finance/R-cran-RFinanceYJ/Makefile
+++ b/finance/R-cran-RFinanceYJ/Makefile
@@ -3,14 +3,14 @@
PORTNAME= RFinanceYJ
PORTVERSION= 0.3.1
-PORTREVISION= 3
+PORTREVISION= 4
CATEGORIES= finance
DISTNAME= ${PORTNAME}_${PORTVERSION}
MAINTAINER= tota@FreeBSD.org
COMMENT= Japanese stock market from Yahoo!-finance-Japan
-LICENSE= BSD
+LICENSE= BSD3CLAUSE
RUN_DEPENDS= R-cran-XML>0:${PORTSDIR}/textproc/R-cran-XML \
R-cran-xts>0:${PORTSDIR}/math/R-cran-xts
diff --git a/finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R b/finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R
new file mode 100644
index 000000000000..def6e7978286
--- /dev/null
+++ b/finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R
@@ -0,0 +1,15 @@
+--- R/quoteStockTsData.R.orig 2013-08-13 00:05:58.000000000 +0900
++++ R/quoteStockTsData.R 2014-05-25 10:58:31.000000000 +0900
+@@ -57,10 +57,10 @@
+
+ extractQuoteTable <- function(r,type){
+ if(type %in% c("fund","fx")){
+- tbl <- r[[2]][[2]][[7]][[3]][[3]][[9]][[2]]
++ tbl <- r[[2]][[2]][[7]][[3]][[3]][[8]][[2]]
+ }
+ else{
+- tbl <- r[[2]][[2]][[7]][[3]][[3]][[10]][[2]]
++ tbl <- r[[2]][[2]][[7]][[3]][[3]][[11]][[2]]
+ }
+ return(tbl)
+ }