anchor.diff:                                                  subject
                                                   text
                                                   :html-message html)))))))
  -             (dolist (id *active-people-index*)
  +             (dolist (id (remove-duplicates *active-people-index*))
                  (send-mail id)))))
           (flash "your message has been sent"))
   
  
positive.code:                                     text
                                      :html-message html)))))
  
            (t
             (flet ((send-mail (id)
                      (let ((data (db id)))
                        (when (getf data :notify-kindista)
  
negative.code:             (:button :type "submit" :class "yes" "Send to everyone"))))
        :selected "admin")))
  
  (defvar *last-broadcast-email-time* 0)
  
  (defun post-admin-sendmail ()
    (require-admin
      (if (and (post-parameter "markdown")
  