suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: f1d7b9ec3254af1d8ee9fceb1ca2963336629519
This commit is contained in:
Matthew Flatt 2004-09-08 13:28:59 +00:00
parent 89501ac5a4
commit ef5924acbf
3 changed files with 106 additions and 101 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/mred/mred-sig.ss
View File

@ -101,6 +101,7 @@
graphical-read-eval-print-loop graphical-read-eval-print-loop
group-box-panel% group-box-panel%
grow-box-spacer-pane% grow-box-spacer-pane%
hide-cursor-until-moved
horizontal-pane% horizontal-pane%
horizontal-panel% horizontal-panel%
tab-panel% tab-panel%

5
collects/mred/mred.ss
View File

@ -7967,6 +7967,8 @@
[(fn) (wx:file-creator-and-type fn)] [(fn) (wx:file-creator-and-type fn)]
[(fn c t) (wx:file-creator-and-type fn c t)])) [(fn c t) (wx:file-creator-and-type fn c t)]))
(define (hide-cursor-until-moved) (wx:hide-cursor))
(provide button% (provide button%
canvas% canvas%
check-box% check-box%
@ -8068,7 +8070,8 @@
make-namespace-with-mred make-namespace-with-mred
file-creator-and-type file-creator-and-type
current-ps-afm-file-paths current-ps-afm-file-paths
current-ps-cmap-file-paths) current-ps-cmap-file-paths
hide-cursor-until-moved)
) ;; end of module ) ;; end of module

1
collects/mred/private/kernel.ss
View File

@ -608,6 +608,7 @@
(define-function display-origin) (define-function display-origin)
(define-function display-size) (define-function display-size)
(define-function bell) (define-function bell)
(define-function hide-cursor)
(define-function end-busy-cursor) (define-function end-busy-cursor)
(define-function is-busy?) (define-function is-busy?)
(define-function begin-busy-cursor) (define-function begin-busy-cursor)