(defpackage brew-import
  (:use common-lisp brew-db)
  (:export brew-import))

(in-package brew-import)

(defgeneric brew-import (obj))

(defmethod brew-import ((obj brew-db:yeast))
  (clsql:update-records-from-instance obj))

(defmethod brew-import ((obj brew-db:grain))
  (clsql:update-records-from-instance obj))

(defmethod brew-import ((obj brew-db:hop))
  (clsql:update-records-from-instance obj))

(defmethod brew-import ((obj brew-db:style))
  (clsql:update-records-from-instance obj))

(defmethod brew-import ((obj list))
  (mapc #'clsql:update-records-from-instance obj))