[Eventstudies-commits] r365 - pkg/R

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

Author: chiraganand
Date: 2014-05-23 19:31:42 +0200 (Fri, 23 May 2014)
New Revision: 365

Modified:
   pkg/R/eventstudy.R
Log:
Fixed error message, added comment.

Modified: pkg/R/eventstudy.R
===================================================================
--- pkg/R/eventstudy.R	2014-05-23 17:26:00 UTC (rev 364)
+++ pkg/R/eventstudy.R	2014-05-23 17:31:42 UTC (rev 365)
@@ -18,7 +18,7 @@
   }
 
   if (type != "None" && is.null(model.args)) {
-      stop("modelArgs cannot be NULL when type is not None.")
+      stop("model.args cannot be NULL when type is not None.")
   }
 
   if (is.levels == TRUE) {
@@ -29,6 +29,7 @@
   if (is.null(ncol(firm.returns))) {
       stop("firm.returns should be a zoo series with at least one column. Use '[' with 'drop = FALSE'.")
   }
+                                        # store firm names for later use
   firmNames <- colnames(firm.returns)
 
 ### Run models