bin/sup-dump in sup-0.8.1 vs bin/sup-dump in sup-0.9

@@ -19,13 +19,12 @@
 
 No options.
 EOS
 end
 
-index = Redwood::Index.new
+index = Redwood::Index.init
+Redwood::SourceManager.init
 index.load
 
-(1 ... index.index.reader.max_doc).each do |i|
-  next if index.index.deleted? i
-  d = index.index[i]
-  puts [d[:message_id], "(" + d[:label] + ")"] * " "
+index.each_message :load_spam => true, :load_deleted => true, :load_killed => true do |m|
+  puts "#{m.id} (#{m.labels.to_a.sort_by { |l| l.to_s } * ' '})"
 end