gistfile1.txt

# workaround from
# http://stackoverflow.com/questions/1987386/foreign-key-name-in-datamapper-associations
field_naming_convention = lambda do |v|
  if v.name.to_s[0..0] == v.name.to_s[0..0].upcase
    v.name.to_s
  else
    DataMapper::NamingConventions::Field::Underscored.call(v)
  end
end

DataMapper::Repository::adapters.each do |repository, adapter|
  adapter.field_naming_convention = field_naming_convention
end

DataMapper.finalize