dm-oracle-adapter patch for indices with long table names

gistfile1.rb

  def create_index_statement(model, index_name, fields)
    table_name = model.storage_name(name)
    table_name_short = table_name.split("_").map{|s|s[0..3]}.join("_")

    DataMapper::Ext::String.compress_lines(<<-SQL)
      CREATE INDEX #{quote_name("i_#{table_name_short}_#{index_name}")} ON
      #{quote_name(table_name)} (#{fields.map { |field| quote_name(field) }.join(', ')})
    SQL
  end