Module to mixin into a DataMapper model to add a #to_hash method returning a hash with loaded properties.

to_hash.rb

module ToHash
  def to_loaded_hash
    fields = properties.select { |p| p.loaded?(self) }.map(&:name)
    hash = {}
    fields.each { |f| hash[f] = self[f] }
    hash
  end
end