IBP banding data system: emacs customizations

A predicate used to test whether a line-object describes a line that has a tail. Only three line types don't have a tail: lost-band encounters, destroyed-band encounters, and non-transaction lines (such as page header lines).

(defun line-has-tail-p (line-object)
  "Predicate: is this line one of the types that has a tail?
  "
  (if (or (eq (line-kind line-object) 'non-trans)
          (eq (line-kind line-object) 'lost-destroyed))
      nil
    t))