`make-contact` function needs fix

[MityaDementiy]

Hi, @kendru! I worked with Contact Book capstone project and noticed the problem. When I use this code:

(defn maybe-set-address [contact]                          ;; <1>
  (if (:address contact)
    (update contact :address make-address)
    contact))

(defn make-contact [contact]
  (-> contact                                              ;; <2>
      (select-keys [:first-name :last-name :email])
      (maybe-set-address)))

make-contact function returns contact without :address field. I assume it should be fixed in this way:

(defn make-contact [contact]
  (-> contact
      (select-keys [:first-name :last-name :email :address])
      (maybe-set-address)))

Thank you for this great book!

[kendru]

Thank you so much for the fixes!