Error in fread when selecting a subset of columns, and one of the fields contains a sep  #2464

> fread('Date,Description,Amount,Balance\n7/27/15,abcd,"$3,000","$3,000"', 
        select=c("Date", "Description", "Amount"))
Error in fread("Date,Description,Amount,Balance\n7/27/15,abcd,\"$3,000\",\"$3,000\"",  : 
  Too many fields on out-of-sample row 0 from jump 0. Read all 4 expected columns but 
more are present. <<072715,P2150,"$3,000","$3,000">>