Changeset main,67 for main


Ignore:
Timestamp:
11/24/2007 02:53:24 AM (19 years ago)
Author:
David Owen <dsowen@…>
branch-nick:
tui
revision id:
dsowen@fugue88.ws-20071124025324-dt3goz189v10338r
Message:

Defining behavior for ENSURE-ROW-VISIBLE.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • main/grid/display.lisp

    r62 r67  
    133133
    134134(defun ensure-row-visible (grid row)
     135  "Returns T when scrolling was necessary."
    135136  (with-slots (data) grid
    136137    (setf (row-scroll grid) (- row (header-rows data)))))
Note: See TracChangeset for help on using the changeset viewer.