anchor.diff:                     (:like :name "Spell:%")))
          (order-by :name)))))
   
  -(defun get-auction-listing-ids (name)
  +(defun get-auction-listing-ids (name &key (max-days 7))
     "For a given item name, pull out the auction listing ids"
  -  (let* ((matches (query-auctions :regex name))
  +  (let* ((matches (query-auctions :regex name :max-days max-days))
            (ids (mapcar (lambda (match) (getf match :id)) matches)))
       ids))
   
  
positive.code: a frequent rate (similar to how the site is used)."
    (with-connection (db)
      (let ((ids (retrieve-one (select :ids (from :eq_item_index)
                                       (where (:= :name name))))))
        (when (stringp (getf ids :ids))
          ;; For now, lets not do this until we see whats killing the server
          ;;(unless (member name *index-update-list* :test #'equal)
  
negative.code:              (from :|eqAuction|)
               (where
                (:and (:like :listing clause)
                      (:> :date (yyyy-mm-dd (- (get-universal-time) (* 60 60 24 max-days))))))
               (order-by (:desc :date))
               (limit limit)))
            (retrieve-all
  