Add select-line for selecting elements of a line
part of darcs patch Sun Sep 18 18:16:23 EEST 2005 Martin Gasbichler <gasbichl@informatik.uni-tuebingen.de>
This commit is contained in:
parent
4d6cb75cd6
commit
83a4e22212
|
@ -340,11 +340,26 @@
|
||||||
|
|
||||||
(subset focus-table (make-focus-object-reference))
|
(subset focus-table (make-focus-object-reference))
|
||||||
tty-debug
|
tty-debug
|
||||||
plugin
|
|
||||||
utils
|
utils
|
||||||
ncurses)
|
ncurses)
|
||||||
(files select-list))
|
(files select-list))
|
||||||
|
|
||||||
|
(define-interface select-line-interface
|
||||||
|
(export make-select-line
|
||||||
|
select-line-handle-key-press!
|
||||||
|
paint-select-line
|
||||||
|
paint-select-line-at
|
||||||
|
select-line-selected-entry))
|
||||||
|
|
||||||
|
(define-structure select-line select-line-interface
|
||||||
|
(open scheme
|
||||||
|
define-record-types
|
||||||
|
signals
|
||||||
|
|
||||||
|
tty-debug
|
||||||
|
ncurses)
|
||||||
|
(files select-line))
|
||||||
|
|
||||||
;;; joblist viewer
|
;;; joblist viewer
|
||||||
|
|
||||||
(define-structure joblist-viewer
|
(define-structure joblist-viewer
|
||||||
|
|
Loading…
Reference in New Issue