BUG: Second sequence doesn't scroll

[lynch@ils.nwu.edu]

Anybody remember a bug where the second of two sequence-dialog-items in
different sub-views of a window wouldn't scroll?

This is in 2.0 final, but maybe I missed a patch...

Demo of bug:

(make-instance 'dialog
  :window-title "Try the far right scroll bar."
  :view-subviews
  (list
    (make-instance 'view
      :view-position #@(4 4)
      :view-subviews
      (list (make-instance 'sequence-dialog-item 
              :view-size #@(30 60)
              :table-hscrollp nil
              :table-sequence '(1 2 3 4 5 6))))
    (make-instance 'view
      :view-position #@(50 4)
      :view-subviews
      (list (make-instance 'sequence-dialog-item
              :view-size #@(30 60)
              :table-hscrollp nil
              :table-sequence '(1 2 3 4 5 6))))))

#|
'Case it's relevant:
  Quadra 700,
  System 7.0.1  ,
  with Tune-Up ^(or is that what that option-8 dot means?)
  Inits:
    MacTCP
    SuperClock
    Remote
|#
"TANSTAAFL" Rich lynch@ils.nwu.edu