module Grocery.Util.Convert where

import Grocery.Data.Grocery

infile = "../util/resources/groceries-orig"
outfile = "../util/resources/groceries-new"

main = 
   do contents <- readFile infile
      let items = lines contents
      let newList = createList items
      saveGroceryList outfile newList