X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fui%2Fgadgets%2Feditors%2Feditors-docs.factor;h=927e50682496b31a70f920b773531ea00a3f80af;hp=c79b96ad4e6f33a60ee41f732d92c38a1a88e399;hb=ce7ac93667de16e9206a2140941b67a66886d117;hpb=b83435c9a9b1a68ba1afc676c24021067e16b272 diff --git a/basis/ui/gadgets/editors/editors-docs.factor b/basis/ui/gadgets/editors/editors-docs.factor index c79b96ad4e..927e506824 100644 --- a/basis/ui/gadgets/editors/editors-docs.factor +++ b/basis/ui/gadgets/editors/editors-docs.factor @@ -11,16 +11,16 @@ HELP: editor { $class-description "An editor is a control for editing a multi-line passage of text stored in a " { $link document } " model. Editors are created by calling " { $link } "." $nl "Editors have the following slots:" -{ $list - { { $snippet "caret" } " - a " { $link model } " storing a line/column pair." } - { { $snippet "mark" } " - a " { $link model } " storing a line/column pair. If there is no selection, the mark is equal to the caret, otherwise the mark is located at the opposite end of the selection from the caret." } - { { $snippet "focused?" } " - a boolean." } - { { $snippet "preedit-start" } " - a line/column pair or " { $link f } ". It represents the starting point of the string being edited by an input method." } - { { $snippet "preedit-end" } " - a line/column pair or " { $link f } ". It represents the end point of the string being edited by an input method." } - { { $snippet "preedit-selected-start" } " - a line/column pair or " { $link f } ". It represents the starting point of the string being selected by an input method." } - { { $snippet "preedit-selected-end" } " - a line/column pair or " { $link f } ". It represents the end point of the string being selected by an input method." } - { { $snippet "preedit-selection-mode?" } " - a boolean. It means the mode of selecting convertion canditate word. The caret in an editor is not drawn if it is true." } - { { $snippet "preedit-underlines" } " - an array or " { $link f } ". It stores underline attributes for its preedit area." } +{ $slots + { "caret" { "a " { $link model } " storing a line/column pair." } } + { "mark" { "a " { $link model } " storing a line/column pair. If there is no selection, the mark is equal to the caret, otherwise the mark is located at the opposite end of the selection from the caret." } } + { "focused?" { "a boolean." } } + { "preedit-start" { "a line/column pair or " { $link f } ". It represents the starting point of the string being edited by an input method." } } + { "preedit-end" { "a line/column pair or " { $link f } ". It represents the end point of the string being edited by an input method." } } + { "preedit-selected-start" { "a line/column pair or " { $link f } ". It represents the starting point of the string being selected by an input method." } } + { "preedit-selected-end" { "a line/column pair or " { $link f } ". It represents the end point of the string being selected by an input method." } } + { "preedit-selection-mode?" { "a boolean. It means the mode of selecting convertion canditate word. The caret in an editor is not drawn if it is true." } } + { "preedit-underlines" { "an array or " { $link f } ". It stores underline attributes for its preedit area." } } } $nl " Slots that are prefixed with \"preedit-\" should not be modified directly. They are changed by the platform-dependent backend." @@ -33,6 +33,29 @@ HELP: { editor-caret editor-mark } related-words +HELP: caret-is-shape +{ $description + "Shape is defined as line, box, or filled box" +} +$nl +{ $code +" IN: ui.gadgets.editors" +" 2 caret-is-shape set" +"" +} print-element +$nl +{ $table + { "Value" "Shape" } + { "f" "default (line)" } + { "0" "line" } + { "1" "box" } + { "2" "filled box" } +} print-element + +{ $references "Set desired shape in your .factor-rc file" + "rc-files" } + ; + HELP: editor-caret { $values { "editor" editor } { "loc" "a pair of integers" } } { $description "Outputs the current caret location as a line/column number pair." } ;