[Rcpp-commits] r3730 - in pkg/RcppBDT: . R inst

[noreply at r-forge.r-project.org]

Author: edd
Date: 2012-08-08 20:15:08 +0200 (Wed, 08 Aug 2012)
New Revision: 3730

Modified:
   pkg/RcppBDT/ChangeLog
   pkg/RcppBDT/DESCRIPTION
   pkg/RcppBDT/R/bdt.R
   pkg/RcppBDT/inst/NEWS.Rd
Log:
 o Release 0.2.1
 o Add missing date setter to two convenience functions


Modified: pkg/RcppBDT/ChangeLog
===================================================================
--- pkg/RcppBDT/ChangeLog	2012-08-07 16:15:41 UTC (rev 3729)
+++ pkg/RcppBDT/ChangeLog	2012-08-08 18:15:08 UTC (rev 3730)
@@ -1,3 +1,8 @@
+2012-08-08  Dirk Eddelbuettel  <edd at debian.org>
+
+	* R/bdt.R (getEndOfBizWeek,getEndOfMonth): Add call to fromDate() to
+  	pass the argument to the bdt instance
+
 2012-07-02  Dirk Eddelbuettel  <edd at debian.org>
 
 	* DESCRIPTION: Version 0.2.0

Modified: pkg/RcppBDT/DESCRIPTION
===================================================================
--- pkg/RcppBDT/DESCRIPTION	2012-08-07 16:15:41 UTC (rev 3729)
+++ pkg/RcppBDT/DESCRIPTION	2012-08-08 18:15:08 UTC (rev 3730)
@@ -1,7 +1,7 @@
 Package: RcppBDT
 Type: Package
 Title: Rcpp bindings for the Boost Date_Time library 
-Version: 0.2.0
+Version: 0.2.1
 Date: $Date$
 Author: Dirk Eddelbuettel and Romain Francois
 Maintainer: Dirk Eddelbuettel <edd at debian.org>

Modified: pkg/RcppBDT/R/bdt.R
===================================================================
--- pkg/RcppBDT/R/bdt.R	2012-08-07 16:15:41 UTC (rev 3729)
+++ pkg/RcppBDT/R/bdt.R	2012-08-08 18:15:08 UTC (rev 3730)
@@ -1,7 +1,7 @@
 ##
 ## bdt.R: Some accessor functions for Boost Date_Time functionality
 ##
-## Copyright (C) 2010 - 2011 Dirk Eddelbuettel and Romain Francois
+## Copyright (C) 2010 - 2012  Dirk Eddelbuettel and Romain Francois
 ##
 ## This file is part of RcppBDT.
 ##
@@ -20,11 +20,13 @@
 
 getEndOfBizWeek <- function(date = Sys.Date()) {
     stopifnot(inherits(date, "Date"))
+    bdt$fromDate(date)
     bdt$getEndOfBizWeek(date)
 }
 
 getEndOfMonth <- function(date = Sys.Date()) {
     stopifnot(inherits(date, "Date"))
+    bdt$fromDate(date)
     bdt$getEndOfMonth(date)
 }
 

Modified: pkg/RcppBDT/inst/NEWS.Rd
===================================================================
--- pkg/RcppBDT/inst/NEWS.Rd	2012-08-07 16:15:41 UTC (rev 3729)
+++ pkg/RcppBDT/inst/NEWS.Rd	2012-08-08 18:15:08 UTC (rev 3730)
@@ -2,6 +2,13 @@
 \title{News for Package \pkg{RcppBDT}}
 \newcommand{\cpkg}{\href{http://CRAN.R-project.org/package=#1}{\pkg{#1}}}
 
+\section{Changes in version 0.2.1 (2012-08-08)}{
+  \itemize{
+    \item Bug for getEndOfBizWeek() and getEndOfMonth() who were lacking
+    a call to fromDate(date) to actually pass the date for which the
+    functions are computing the end of business week or month.
+  }
+}
 \section{Changes in version 0.2.0 (2012-07-02)}{
   \itemize{
     \item The core module, which wraps what in C++ is