I have found an annoying problem that severely limits the use of table formatting in application panes. This sample code shows the problem:
(in-package :clim-user)
(define-application-frame no-scroll () () (:pointer-documentation t) (:panes (app :application :display-time :command-loop :display-function 'display-function :end-of-line-action :wrap :end-of-page-action :scroll :scroll-bars t)) (:layouts (default app)))
(defun display-function (frame stream) (declare (ignore frame)) (formatting-table (stream) (dotimes (i 100) (formatting-row (stream) (formatting-cell (stream) (princ i))))))
(define-no-scroll-command (com-quit :menu t) () (frame-exit *application-frame*))
Run it with:
(run-frame-top-level (make-application-frame 'no-scroll))
Although the tabular output is longer than the application pane's viewport, it is not possible to vertically scroll it to see the remaining part. The thumb occupies all the scroll bar's area, as if there was no additional output.
Is the above code supposed to work? Am I doing anything wrong? Any workarounds?
Paolo