svn commit: r355146 - in head/finance/R-cran-RFinanceYJ: . files

[TAKATSU Tomonari]

Author: tota
Date: Sun May 25 08:55:32 2014
New Revision: 355146
URL: http://svnweb.freebsd.org/changeset/ports/355146
QAT: https://qat.redports.org/buildarchive/r355146/

Log:
  - Add a patch to fix the result of xmlRoot because of changing
    the layout in May 2014
  - Specify LICENSE BSD -> BSD3CLAUSE

Added:
  head/finance/R-cran-RFinanceYJ/files/
  head/finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R   (contents, props changed)
Modified:
  head/finance/R-cran-RFinanceYJ/Makefile

Modified: head/finance/R-cran-RFinanceYJ/Makefile
==============================================================================
--- head/finance/R-cran-RFinanceYJ/Makefile	Sun May 25 08:54:49 2014	(r355145)
+++ head/finance/R-cran-RFinanceYJ/Makefile	Sun May 25 08:55:32 2014	(r355146)
@@ -3,14 +3,14 @@
 
 PORTNAME=	RFinanceYJ
 PORTVERSION=	0.3.1
-PORTREVISION=	3
+PORTREVISION=	4
 CATEGORIES=	finance
 DISTNAME=	${PORTNAME}_${PORTVERSION}
 
 MAINTAINER=	tota at 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

Added: head/finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/finance/R-cran-RFinanceYJ/files/patch-R-quoteStockTsData.R	Sun May 25 08:55:32 2014	(r355146)
@@ -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)
+   }