[mcclim-cvs] CVS mcclim/Doc
thenriksen
thenriksen at common-lisp.net
Mon Nov 19 20:38:10 UTC 2007
Update of /project/mcclim/cvsroot/mcclim/Doc
In directory clnet:/tmp/cvs-serv7960/Doc
Modified Files:
drei.texi
Log Message:
Added mention of new Drei functions to the documentation.
--- /project/mcclim/cvsroot/mcclim/Doc/drei.texi 2007/08/20 17:52:44 1.8
+++ /project/mcclim/cvsroot/mcclim/Doc/drei.texi 2007/11/19 20:38:10 1.9
@@ -75,52 +75,35 @@
malfunction.
@menu
-* Special Variables::
+* Special Variables::
+* Access Functions::
@end menu
@node Special Variables
@subsection Special Variables
-Drei commands are meant to work by using the values of a number of
-special variables bound by Drei during its pseudo command loop. Here is
-a list of them:
-
- at defvar *current-window*
- at vindex *current-window*
-Somewhat counter-intuitively, the Drei instance. Not necessarily the
-same as the editor pane.
- at end defvar
- at defvar *current-buffer*
- at vindex *current-buffer*
-The buffer of the Drei instance the command is being executed for.
- at end defvar
- at defvar *current-mark*
- at vindex *current-mark*
-The mark of the Drei instance.
- at end defvar
- at defvar *current-point*
- at vindex *current-point*
-The point of the Drei instance.
- at end defvar
- at defvar *current-syntax*
- at vindex *current-syntax*
-The syntax of @cl{*current-buffer*}.
- at end defvar
- at defvar *kill-ring*
- at vindex *kill-ring*
-The kill-ring object of the Drei instance.
- at end defvar
- at defvar *minibuffer*
- at vindex *minibuffer*
-The minibuffer of the Drei instance, which is where commands should
-print information and other interesting things (using
- at cl{display-message} or @cl{with-minibuffer-stream}). This may be
- at cl{NIL} if no minibuffer is associated with the Drei instance.
- at end defvar
- at defvar *previous-command*
- at vindex *previous-command*
-The previous CLIM command that was executed by the Drei instance.
- at end defvar
+Drei uses a number of special variables to provide access to data
+structures. These are described below.
+
+ at include var-drei-star-drei-instance-star.texi
+ at include var-drei-kill-ring-star-kill-ring-star.texi
+
+Additionally, a number of ESA special variables are used in Drei.
+
+ at include var-esa-star-minibuffer-star.texi
+ at include var-esa-star-previous-command-star.texi
+
+ at node Access Functions
+ at subsection Access Functions
+
+The special variables essentially provide all that is needed to access
+all parts of the Drei state, but for convenience, a number of utility
+functions providing access to commonly used objects have been defined.
+
+ at include fun-esa-current-buffer.texi
+ at include fun-drei-point.texi
+ at include fun-drei-mark.texi
+ at include fun-drei-current-syntax.texi
@node External API
@section External API
@@ -1189,13 +1172,12 @@
(define-command (com-repeat-word :name t
:command-table editing-table)
()
- (let ((mark (clone-mark *current-point*)))
- (backward-word mark *current-syntax* 1)
- (insert-sequence mark (region-to-sequence mark *current-point*))))
+ (let ((mark (clone-mark (point)))
+ (backward-word mark (current-syntax 1)
+ (insert-sequence mark (region-to-sequence mark (point))))
@end lisp
-For @cl{*current-point*} and @cl{*current-syntax*}, see @ref{Special
-Variables}.
+For @cl{(point)} and @cl{(current-syntax)}, see @ref{Access Functions}.
This command facilitates the single repeat of a word, but that's
it. This is not very useful - instead, we would like a command that
@@ -1208,9 +1190,9 @@
(define-command (com-repeat-word :name t
:command-table editing-table)
((count 'integer :prompt "Number of repeats"))
- (let ((mark (clone-mark *current-point*)))
- (backward-word mark *current-syntax* 1)
- (let ((word (region-to-sequence mark *current-point*)))
+ (let ((mark (clone-mark (point)))
+ (backward-word mark (current-syntax 1)
+ (let ((word (region-to-sequence mark (point)))
(dotimes (i count)
(insert-sequence mark word)))))
@end lisp
More information about the Mcclim-cvs
mailing list