blob: 7c812c5b9bfe23a7a2d58cfc1fe35ef6a3d5910a (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
Corner is a simple 'hot-corners' implementation. It instantiates a
CornerDelegate object and sends it messages of the form -enterTopLeft and
-exitTopLeftAfter: for each corner, where the exit message takes the number of
seconds the mouse spent in that corner as an argument.
The delegate simply ignores these messages by default. A category on this
object, however, can be provided. If you store a Smalltalk script in the
"CornerScript" default as a string object then this will be loaded
automatically and compiled. If this contains a category on CornerDelegate then
the Smalltalk implementation will be called instead. A trivial example might
log a message when the corner was entered was called:
$ defaults write Corner CornerScript \
"CornerDelegate extend [ enterTopLeft [ 'Script called' log. ] ]"
LICENSE: BSD
WWW: http://www.etoile-project.org/
|
