[Blotter-commits] r722 - pkg/FinancialInstrument/R

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

Author: gsee
Date: 2011-08-09 04:03:23 +0200 (Tue, 09 Aug 2011)
New Revision: 722

Modified:
   pkg/FinancialInstrument/R/instrument.R
Log:
 forgot the sep arg in a paste

Modified: pkg/FinancialInstrument/R/instrument.R
===================================================================
--- pkg/FinancialInstrument/R/instrument.R	2011-08-08 23:22:33 UTC (rev 721)
+++ pkg/FinancialInstrument/R/instrument.R	2011-08-09 02:03:23 UTC (rev 722)
@@ -306,7 +306,7 @@
                     stop("must provide 'callput' or a 'suffix_id' from which 'callput' can be inferred.")
                 if (is.null(strike)) 
                     stop("must provide 'strike' or a 'suffix_id' from which 'strike' can be inferred.")
-                suffix_id <- paste(format(sdate,'%y%m%d'), sright, strike)
+                suffix_id <- paste(format(sdate,'%y%m%d'), sright, strike, sep="")
             }
             primary_id <- paste(root_id, suffix_id, sep="_")
         }