diff options
| author | tota <tota@FreeBSD.org> | 2014-05-25 16:55:32 +0800 |
|---|---|---|
| committer | tota <tota@FreeBSD.org> | 2014-05-25 16:55:32 +0800 |
| commit | 67a7c03da03e5d2d6888ef178d49a267bf714efc (patch) | |
| tree | 096711d4c371160ca086afb4133129aa7f24e42e /finance | |
| parent | c882ca8d2f2a69ee23e72eda3bfb3944d031e8a8 (diff) | |
| download | freebsd-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')
| -rw-r--r-- | finance/R-cran-RFinanceYJ/Makefile | 4 | ||||
| -rw-r--r-- | finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R | 15 |
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) + } |