Interlisp.medley/library/tedit/TEDIT-RELEASENOTES.TEDIT

Medley	Tedit Release Notes
2

4

1

TEDIT RELEASE NOTES
1

4

By Ron Kaplan
This document was last edited in January 2026.

January 2026
Modifications to the abbreviation facility
The interface to Tedit's abbreviation facility (the :EXPAND action currently bound to ^x) has been modified in several ways.
If the current selection is a point or one-character selection, then the characters preceding the caret are compared against the entries in the abbreviation table, and the entry that matches the longest substring is chosen for expansion and any of its shorter suffixes are ignored.  Thus D is an abbreviation for double dagger and DATE expands to the current date.  If the string DATE precedes the caret, the date will be inserted.  For any other string ending in D only the double dagger will be inserted.  The intent is to simplify the process of entering and expanding abbreviations in the course of typing a run of text.  When this is the desired result there is no need to stop typing to make an explicit multi-character selection before entering ^x.
However, if the current selection covers multiple characters, then an entry is chosen only if it matches all the selected characters (the original behavior).
If a multi-character selection is the name of a character (e.g. Greek,a for ÿÿ&aÿ, as determined by CHARCODE.DECODE) and that string matches no other entry in TEDIT.ABBREVS, then the character-name is replaced by the named character (essentially simulating on the fly the entry (Greek,a ÿÿ&aÿ).  Note that a character-name string immediately in front of a point selection will not be recognized and expanded; a backslash in front of the caret is required to indicate that intent).
If an abbreviation string in the text immediately follows a backslash \, then that character is consumed when the abbreviation string is expanded.  This is consistent with the Latex convention for inserting  special characters that may be familiar to some users:  the strings \in and in will both expand to set membership ÿÿïJÿ.  A mapping for standard Latex names (e.g. \cup for ÿÿïWÿ) could be provided as a simple lispusers package.
If the character immediately preceding the caret is a backslash, then the string between that backslash and the nearest preceding one is interpreted as a multi-character selection requiring a complete match.  This is a convenience for invoking a specific multi-character abbreviation during type-in:  typing \Greek,a\^x will produce ÿÿ&aÿ  without executing the several mouse actions needed to make an explicit multi-character selection.

October 2025
Updated for new IMAGEFILE interface.
The IMAGEFILETYPE/PRINTFILETYPE of formatted Tedit files is TEDIT, not TEXT.
The new function TEDIT.TO.IMAGEFILE converts Tedit files to image files directly, without depending (or ignoring) the printer-specification arguments  of  TEDIT.FORMAT.HARDCOPY.
(TEDIT.TO.IMAGEFILE TSTREAM IMAGEFILE IMAGETYPE OPTIONS)	[Function]
Converts the Tedit stream TSTREAM to an image file of type IMAGETYPE (e.g. PDF, HTML) on a new file named IMAGEFILE.  If IMAGEFILE is not provided and TSTREAM is a stream on a backing file, the target file-name is constructed by appending an IMAGETYPE extension to the name field of the stream's backing file.
OPTIONS is a property list with properties
FIRSTPAGE#  The number to appear on the first page
STARTPG  The first page of the stream to be included
ENDPG  The last page to be included
QUIET  If T, suppresses after-formatting status messages in the prompt window.
Tedit ignores any other properties, but passes them through to the generic OPENIMAGESTREAM.

July 2025
There is now a user-level way of setting the initial paragraph looks for every new document:
TEDIT.DEFAULT.PARALOOKS	[Variable]
A paragraph-looks property list that provides the default paragraph property values that are applied to the first insertion of a new, empty document.  Initialized to
(QUAD LEFT LEFTMARGIN 0 1STLEFTMARGIN 0 RIGHTMARGIN 0 PARALEADING 0 POSTPARALEADING 0 DEFAULTTAB 36)

April  2025
Window splitting
Previously, the splitting and unsplitting of Tedit window-panes was controlled by clicking in a region to the right of the document display, and that window-region was reserved even though splitting/unsplitting is an infrequent operation.  Also, there was a little bit of confusion as to whether a click to the right was intended to select the last character or initiate a split.  Window splitting and unsplitting is now determined by items in the middle-button Tedit menu.  Clicking "Split Window" will split so that the line with the currently blinking appears at the top of a new window pane. Clicking  "Unsplit Window" will eliminate the pane with the currently blinking caret (unless it is the top/primay pane).  (The original region-based interface can be reinstalled by setting \TEDIT.OBJ.WIDTH to the desired window width, for example, a value of 18 defines a split region that is roughly a quarter of an inch wide.)
Color
Tedit now includes the basic infrastructure for color. The color of a selection can be manipulated with the COLOR attribute for TEDIT.LOOKS and TEDIT.GET.LOOKS, and the caret looks (the appearance of new typed characters) can be set by TEDIT.CARETLOOKS or DSPCOLOR. The default color is the atom BLACK.  There is currently no menu interface for color. Whether or not color changes show up in a hardcopy file depends on the capabilities of the output image stream.
Miscellaneous
The USER.CM file when opening a Bravo-format file can be specified as the value of a new USER.CM property.

March  2025
Minor adjustments
Tedit now passes the HOSTSTREAM as an additional argument to an image object IMAGEBOXFN.
TEDIT.FORMAT.HARDCOPY now has an additional QUIET argument that suppresses the printing in the promptwindow of the number of pages and the destination file.  The caller can update the window before or after the hardcopy.
The caller of TEDIT.MAP.OBJECTS can now specify in the COLLECT? argument the values that are to be collected.  The possible values for COLLECT? are
OBJECT:  The image objects are collected.
CH#: The character positions of the objects are collected.
VALUE: The values returned by applying function FN to each object are collected.
FIRST: The return is the list (ch# object value) for the first object that satisfies the predicate FN.  Essentially a test to see if there are any such objects.
Any other non-NIL value: The (ch# object value) for the objects are collected, as before.
TEDIT.SELPROP now makes the SET property accessible, and values for the SHADE and SHADEHEIGHT properties can be changed.
A non-NIL text property DEFAULTPUTEXTENSION is used in the prompt for the destination file name, otherwise TEDIT is suggested for a formatted file as before and TXT is suggested for an unformatted file. This property is set to the empty string for Lisp source files.
Region prompt at window opening
Previously, when a region or window was not provided in the call to TEDIT, the user would be asked to sweep out a screen region before Tedit examined any of the properties of the intended target of the edit. No guidance was provided to the user that distinguished an editing session on, say, an empty document from a session on a pre-existing formatted document, or a Lisp source file.  The order of operations has been changed so that an existing document is now opened before the window is constructed, and information derived from the document is used to prompt for an appropriate initial region size.
In the case of a formatted document, Tedit offers a ghost region whose width is is determined from the document's margins and whose height is enough to show the first 20 lines of the file.
For a Lisp source file or individual function (e.g. from Gitfns comparisons or Filebrowser SEE or EDIT commands), the width is set to cover TEDIT.SOURCE.LINELENGTH characters in the default font (heuristically initialized to 110, an attempt to minimize the number of unintended line-wraps). The initial height is set to cover TEDIT.SOURCE.NLINES in the default font.
The initial region for a TDRIBBLE stream is the width and height of the Exec window.
The caller can also specify directly the initial width and height (in points) of the window by providing values for the Tedit properties OPENWIDTH and OPENHEIGHT. 
In each of these cases, the user is prompted only to locate an anchor point for a ghost region of the precomputed fixed size, no sweeping is requested (or allowed).  (The downside of open-first/window-second is that if something goes wrong in the opening, error messages shows up in the System promptwindow, not the promptwindow of an already open but empty Tedit window.)
If the initial width or height is not provided or cannot be inferred, the user will be asked to sweep out a region as before.
New architecture for edit-character bindings
This release incorporates a new architecture for setting up the association of editing characters with the Tedit functions that implement them.  The mappings between characters and implementations is the composition of a mapping from characters to the names of the actions that they trigger, and a mapping from names of action to their implementation methods.  Thus the characters Meta,U and Meta,Z both map to the action-name UNDO and the name UNDO then maps to the implementation function TEDIT.UNDO. Importantly, this architecture is independent of the source of the characters that are bound to particular actions, that is the province of KEYACTION tables and other system conventions. 
The association between the names of possible editing actions and their implementations is provided by the list TEDIT.CHARACTIONS.
TEDIT.CHARACTIONS	[Variable]
Each element of TEDIT.CHARACTIONS is a pair of the formÿÿ

ÿ	(ACTIONNAME IMPLEMENTATION)ÿÿ

ÿwhere ACTIONNAME is an atom that identifies a particular action, for example the key-words :CHARDELETE.BACKWARD, :FIND.FORWARD, :BOLD.ON. The implementation for each action is either an atom or a list.  An atom is the format that previously existed and is provided for backward compatibility.  It is interpreted as a function of three arguments, the text stream TSTREAM, its TEXTOBJ, and its current selection SEL.  A list is interpreted as a form to be evaluated in a context in which the variables TSTREAM, TEXTOBJ, SEL, and also a typed-in character code CHARCODE are bound as SPECVARS. This format allows for the same implementation function to be parameterized with less clutter for different actions.
Here are some TEDIT.CHARACTIONS entries:
	(:SUBSTITUTE \TEDIT.CHAR.SUBSTITUTE)ÿÿ

ÿ	(:NEST (\TEDIT.CHAR.NEST TSTREAM NIL))ÿÿ

ÿ	(:UNNEST (\TEDIT.CHAR.NEST TSTREAM T))
The :SUBSTITUTE action is implemented by applying the function \TEDIT.CHAR.SUBSTITUTE to the current selection of the text stream.  The :NEST and :UNNEST actions (for indenting/unindenting both left and right margins) are implemented by calls to \TEDIT.CHAR.NEST that differ in the flag that indicates whether margins are to be brought in or pushed out.
The entries on TEDIT.CHARACTIONS are "built-in" in the sense that they are typically implemented through internal, private interfaces. But whether or not those actions are invoked by one or more keystrokes depends on whether they are bound to particular character codes.  The binding of characters to actions is accomplished by installing a list of character bindings.  This is intended as a more public interface, depending on personal preferences.  But the default set of character bindings is provided by the variable TEDIT.CHARBINDINGS.   
TEDIT.CHARBINDINGS	[Variable]
Each character binding is a list of the formÿÿ

ÿ	(ACTIONNAME CHAR1 CHAR2 ...)ÿÿ

ÿwhere ACTIONNAME is one of the actions defined in TEDIT.CHARACTIONS and each CHARi is typically the name of a character (e.g. Meta,S) but possibly a raw character code.  Among the entries currently included in TEDIT.CHARBINDINGS are:
	(:SUBSTITUTE "Meta,s" "Meta,S")ÿÿ

ÿ	(:FIND.BACKWARD "Meta,F")ÿÿ

ÿ	(:FIND.FORWARD.AGAIN "Meta,g")ÿÿ

ÿ	(:CHARDELETE.FORWARD "­W" "­U")ÿÿ

ÿ	(:NEST "Meta,[")
Installing a character binding list has the effect of binding each of the characters to the implementation of the associated action. 
TEDIT.CHARBINDINGS is initialized to the union of TEDIT.BASIC.CHARBINDINGS and TEDIT.DORADO.CHARBINDINGS.  The traditional Tedit bindings  and the bindings from TEDITKEY are in the basic list, the TEDIT.DORADO.CHARBINDINGS are additional bindings derived from the now-obsolete lispusers files TKDORADO and TEDITDORADOKEYS (see below).
A set of character bindings is installed into the general TEDIT.READTABLE or the readtable of a particular stream by the function TEDIT.INSTALL.CHARBINDINGS:
(TEDIT.INSTALL.CHARBINDINGS CHARBINDINGS RDTBL [CHARACTIONS])	[Function]
CHARBINDINGS is a list of character bindings, defaulting to the value of TEDIT.CHARBINDINGS.  RDTBL can be a read table or a text stream whose read table will be affected.  RDTBL defaults to the global TEDIT.READTABLE.  (The optional CHARACTIONS defaults to TEDIT.CHARACTIONS; it is provided as an argument so that sophisticated users can introduce their own special actions.)
The expression (TEDIT.INSTALL.CHARBINDINGS) is evaluated when Tedit is loaded.  It installs the actions specified in TEDIT.CHARBINDINGS in the global TEDIT.READTABLE.
(TEDIT.CLEAR.BINDINGS BINDINGS RDTBL)	[Function]
Removes the bindings in BINDINGS from RDTBL. All bindings are removed if BINDINGS is NIL.
(TEDIT.GET.CHARACTION CHARCODE BINDINGS)	[Function]
Returns the name of the action, if any, that BINDINGS associates with CHARCODE (a code or a character name). BINDINGS can be a binding list or a read table.
(TEDIT.GET.CHARBINDING ACTION BINDINGS RETURNCODES)	[Function]
Returns the characters that are bound to ACTION in BINDINGS (a list or read table), NIL if there are no bindings for ACTION. Unless RETURNCODES, characters are represented by their character names, otherwise their numeric codes. The value is a singleton name/number if there is only one, otherwise a list.
Note that the functions TEDIT.SETFUNCTION and TEDIT.GETFUNCTION exist as before. They operate directly on the implementation of a given code, not on the action whose name serves as an intermediary.
(TEDIT.GET.ALL.CHARBINDINGS RDTBL RETURNCODES)	[Function]
Returns an alist containing all of the (character action) bindings in RDTBL (or the read table of a text stream).
(TEDIT.CHARBINDINGS.INVERT CHARBINDINGS RETURNCODES)	[Function]
Returns an alist that maps each character (or character code) to a list of all the actions that it is bound to in CHARBINDINGS. 
(TEDIT.CONFLICTING.CHARBINDINGS CHARBINDINGS NOERROR)	[Function]
CHARBINDINGS is a list of character bindings, maybe the APPEND of bindings from different sources.  If NOERROR, this returns a list of characters that map to more than one character action and thus require some adjustment. Otherwise, it causes an error if there is a binding conflict for at least one character.
The new architecture replaces the capabilities provided by the earlier TEDITKEY, TKDORADO, TEDITDORADOKEYS, and EDITKEYS lispusers packages, and it obsoletes those files.
The character bindings of TKDORADO and TEDITDORADOKEYS are defined in the binding list TEDIT.DORADO.CHARBINDINGS; essentially these assign a set of meta-control characters to various formatting actions (e.g. Meta,b for bold, Meta,B for not-bold), Meta-( to wrap in parentheses).
The sensible TEDITKEY operations are included in TEDIT.CHARACTIONS and  TEDIT.CHARBINDINGS (mostly) makes the same character assignments. 
EDITKEYS-like edit buttons are constructed by the function TEDIT.BUTTONS.BUILD:
(TEDIT.BUTTONS.BUILD BUTTONSPEC TITLE NROWS  CHARBINDINGS)	[Function]
where BUTTONSPEC is a list of elements of the form
	(BUTTONLABEL ACTION1 [ACTION2])
The image of a key labeled with BUTTONLABEL is constructed for each element.  If a button is selected and a Tedit window has the input focus, a character bound to ACTION1 is inserted into the system buffer if the shift key is not down, otherwise a character bound to ACTION2 is inserted.
BUTTONSPEC defaults to the list TEDIT.BUTTONS.SPEC, TITLE defaults to "Tedit Buttons", NROWS is 1, and CHARBINDINGS is TEDIT.CHARBINDINGS.
TEDIT.BUTTONS.SPEC	[Variable]
Here are some of the entries on TEDIT.BUTTONS.SPEC:
	(Bold :BOLD.ON :BOLD.OFF)ÿÿ

ÿ	(Italic :ITALIC.ON :ITALIC.OFF)ÿÿ

ÿ	(Case  :UCASE :LCASE) ÿÿ

ÿ	((Strike- out) :STRIKEOUT.ON :STRIKEOUT.OFF)
A new item Buttons appears in the Tedit default menu.  (TEDIT.BUTTONS.BUILD) is evaluated when that item is selected.

Tedit Fifth Round:  November 2024
Bug fixes
Performance improvements in line updating when typing and especially printing (the important slow case remains: printing at the end of the stream, e.g. for transcript/dribble applications)
Fixed glitches in transitions between fat XCCS characters on either side of image objects.
Fixed copying (shift-select, COPYINSERT) from Tedit to non-Tedit TTY windows, and from non-Tedit sources (Clipboard, Sedit) to Tedit.
And many other issues...
Overhauls
More work on eliminating X-pointer cycle between the TEXTSTREAM and the TEXTOBJ (STREAMHINT field). Some paths still remain (there is a define flaw in that the stream returned to the user is also used for internall for search and display).
Scrolling/display
Fewer line-update subroutines, for maintainability
Improved caret placement with keyboard input
Improved line and caret placement at bottom of pane and end of document, with or without EOL's
Scrolling when window's left side is off-screen now updates correctly 
Fixed glitches in reshaping
Selection
Removed (x)pointer cycle through selection datatype. TEDIT.GETSEL returns a copy that includes a pointer to the text stream, not the TEXTOBJ. (part of deprecating TEXTOBJ as a public data structure).
Tedit menus
Rework of button primitives, simplified and more public interface (see below).
HELP and SHOULDNT replaced by ERROR, unless \TEDIT.THELPFLG. 
The number of state-variables in a Tedit process has been reduced, a step towards eventually having all Tedit's run in a single process.
New functionality
Meta keys:
D|d  bring up DINFO man page, like Sedit, for a selected word (for Lisp source files or functions, a "word" is an atom according to the file's reader environment)
O|o  apply ED to current word (like open in Sedit)
F  finds backwards (vs f = finds forward)  (wildcard #/* matching is improved)
g  finds again forwardÿÿ

ÿG  finds again backward
<|,  move caret back one character, without deleting. (Delete key deletes backwards.)
>|.  move caret forward one character, without deleting. (Del key deletes forward.)
R|r re-applies the last history operation at a new location (e.g. for multiple inserts in different places).
U undoes the last undone history action (meta-u undoes the last event, as before). (History now maintains multiple events, not just the last one).
The DEL  key deletes 1 character forward.

Tedit properties (at open or via TEXTPROP):
READONLY property can have value QUIET instead of just T: Still suppresses attempted changes but doesn't put up a warning message. 
APPEND added to allow updates only at the end of the stream, also with T/QUIET options.
DON'TUPDATE value T suppresses updating of the display while other changes are being made, NIL restores the updating.
NOTSPLITTABLE value T suppresses the split-region of the Tedit window so that the window cannot be split (or unsplit).  NIL restores splitting possibilities.
HISTORY value OFF erases the current history at the next document-changing event and suppresses further recording, so that document changes cannot be undone.  ON restores history recording for future undoing. CLEAR discards current history and begins a new epoch of events.  HISTORY is turned OFF by default when READONLY the APPEND properties are applied.
FILENAME returns the filename associated with the document.  Cannot be set.
PAGEFORMAT returns or sets (by calling TEDIT.PAGEFORMAT) the page format for the document (cf TEDIT.SINGLE.PAGEFORMAT, TEDIT.COMPOUND.PAGEFORMAT).
DIRTY marks the document as dirty (T) or clean (NIL), changes titlebar *.
LENGTH (fetch only) returns the current document length in characters.
PARABREAKCHARS is a list of characters that cause paragraph breaks, usually (EOL CR LF).  Setting to NIL means that no paragraph breaks will be inserted (and if there are no other character-looks changes, all characters will go into one extended piece).  NIL is the best (and default) setting for Lisp source files, since there is no meaningful difference between paragraphs and lines.
The value of the FONT property can be a fontclass atom (e.g. DEFAULTFONT), no need to wrap it in FONTCREATE. 

(TEDIT.SELPROP SEL PROP NEWVALUE) gets and sets the properties of a selection as returned by TEDIT.GETSEL, in order to hide Tedit internals. The following properties are valid:
CH# CHLIM LENGTH (=DCH) POINT KIND POINTCH# SELOBJ TEXTSTREAM SHADE SHADEHEIGHT
The selection returned by TEDIT.GETSEL is a copy of the document's current selection, with a pointer to the textstream as its TEXTSTREAM propery.  The modified selection can be passed back in through public selection-taking functions (TEDIT.INSERT, TEDIT.SETSEL...).
 String-like access to Text streams:
(TEDIT.NCHARS TSTREAM) 	[Function]ÿÿ

ÿReturns the number of characters in the stream
(TEDIT.NTHCHARCODE TSTREAM N)	[Functionÿÿ

ÿReturns the Nth character-code of TSTREAM, NIL if N is out of bounds. Negative N counts from the end. If the Nth "character" is an image object, that object is returned.  TSTREAM may be a selection (from TEDIT.GETSEL), in which case N picks from the characters in that selection. 
(TEDIT.NTHCHAR TSTREAM N)	[Functionÿÿ

ÿThe Nth character code of TSTREAM is returned as the corresponding character. 
(TEDIT.RPLCHARCODE TSTREAM N NEWCHARCODE NEWCHARLOOKSÿÿ

ÿ         DONTDISPLAY)	[Function]ÿÿ

ÿReplaces the character at position N with NEWCHARCODE (which may be an image object).  NEWCHARLOOKS can specify the looks of the new character if they are to be different from the looks of the character being replaced. Does not extend the stream:  N must be between 1 and the length of the stream.  (BOUT extends). 
 (TEDIT.CONCAT TSTREAMS SEPARATOR)	[Function]ÿÿ

ÿReturns a textstream containing the concatenation of the ordered list of TSTREAMS, separated by SEPARATOR if provided. SEPARATOR can be a character name (e.g. FORM), a character code, or a string.  The specification for page numbering is taken from the first TSTREAM and carries through.
(TEVAL FORM WINDOW TITLE DONTDEFER)	[Macro]ÿÿ

ÿEvaluates FORM with the TTY stream set to a text stream in WINDOW with title TITLE.  History events are not recorded, and the stream is initialized as APPEND QUIET.  Screen updating is suppressed until the evaluation of FORM is complete, unless DONTDEFER.  At that point the stream is changed to READONLY QUIET. Example: (TGREP --) is implemented as (TEVAL (GREP --). (Note that TTY keyboard interaction won't be visible unless DONTDEFER; TDRIBBLE may be more appropriate). The PARABREAKCHARS property is set to NIL.
(TEDIT.DEFER.UPDATES TSTREAM AFTERPROPS)	[Function]ÿÿ

ÿSuppresses display updating of TSTREAM until the exit of an enclosing RESETLST.  At that point AFTERPROPS are applied to the stream.  This is a simple way of avoiding the perceptible slowness of incremental screen updates when a program is filing up a textstream.
(TDRIBBLE)	[Function]ÿÿ

ÿDribbles to a text stream that opens in a scrollable/searchable window when dribbling is ended by a call to DRIBBLE. The stream is APPEND QUIET with PARABREAKCHARS NIL.
(TEXTSTREAM TSTREAM NOERROR) 	[Function]ÿÿ

ÿIf the new argument NOERROR is T, returnsÿÿï!ÿNIL if TSTREAM cannot be coerced to a text stream, otherwise causes an error as before. 
Changed behavior
Textstream BOUT now behaves like the generic BOUT (and character printing) to other output streams: appends at the end, replaces in the middle.
BOUT creates a history event by default, so it is undoable and the history keeps in step with the state of the document.   A sequence of BOUT's appended to the end of the document will be collected into a single event and undone all together.  BOUTs that replace characters in the earlier in the document will be recorded as separate events. History will be suppressed if the text property HISTORY is set to OFF.
[Soon: History is not cleared after a Put is performed, so that it is possible to back out of edits made before a checkpoint file has been written.]  
Line leading has been moved from the line descent to the line ascent.  The effect is that highlighting stays close to the bottom of a selection's line rather than close to the top of the line below. The difference is visually apparent if the leading is large, for example, double spaced.
The TO and FROM selection-arguments of TEDIT.MOVE and TEDIT.COPY can be specified as text  streams as well as selections. The source and target are then taken as the current selections of those streams.  This may make it unnecessary in some cases to use TEDIT.GETSEL to extract a free-floating selection, which should be discouraged.  
(More) public support for Tedit menus
There is a new, cleaner, more maintainable, and more public platform for creating and interpreting Tedit menus (like Character Looks, Paragraph Looks, etc.). These functions are in the new file TEDIT-BUTTONS and the code in TEDIT-MENU shows how they are used. Generally the function in TEDIT-BUTTONS have names prefixed with MB (for Menu Button).
 (MB.ADD MENUDESC MENUTSTREAM WHERE)	[Function]ÿÿ

ÿMENUDESC is a list of descriptors of menu items to be inserted as a sequence in the pre-existing textstream MENUTSTREAM. The first menu-item will be inserted after WHERE if provided, otherwise at the end of the stream.
A menu-item descriptor can be
A string, presumably just a rubric whose characters will be inserted.  The atoms EOL and TAB stand for the strings containing those singleton characters. The string's characters will be inserted in the stream's current font. The characters will be protected: not selectable.
A positive integer:  that many protected spaces will be inserted.
A list of the form (TEXT (STRING string) (FONT fontspec)). This is treated like a string except that the characters are in fontspec, a font  (e.g. (HELVETICA 10 BOLD)), a font descriptor, or a font class. 
A list of the form (Buttontype . buttonproperties) that specfies a button image object of the indicated type with the specified properties.
Among the properties are at least one of IDENTIFIER and LABEL.  The function MB.GET locates the button by its litatom IDENTIFIER, LABEL is the string that is displayed for the button (except that FIELD buttons have PRELABEL and POSTLABEL properties).  If only LABEL is provided, IDENTIFIER is assumed to be (U-CASE LABEL). If only IDENTIFIER is provided, it is also taken to be the label. 
Most buttons also have:
STATE The result of clicking on the button.
INITSTATE The initial value of STATE
FONT The font for the button's LABEL display, if not (HELVETICA 8 BOLD).
SELECTFN  A function of the object, the menu's window, selection, and the textstream.  This is executed in the window's coordinate system, if the button is selected (buttons come up while mouse is in the button).
STATECHANGEFN A function called to take special action whenever the STATE changes.  Arguments: button-object, new state, menu-stream.
SETSTATEFN A function called to install a new state.  Arguments: the piece containing the button, a new value, and menu-stream.  The piece permits searching for the state of other buttons before or after (e.g. The Other font toggle looking for the field containing the new font-family  or the font-family object where the new family will be installed. The given value may be something that should be coerced to ON or OFF (e.g. Bold is turned ON if the font of a document's current selection is bold).
GETSTATEFN A function that may map the state as determined by the button type into some other interpretable value or action.
IGNORE T if a button does not represent an independent characteristic of the character, paragraph, or page looks. For example, TABTYPE indicates how to interpret tabs as they are specified in the tab-stop bar of the paragraph menu, but it is not an independent property of the paragraph looks.  
The button types and their further relevant properties are:
ACTION  	[Button type]ÿÿ

ÿExecutes the SELECTFN when selected. The APPLY, SHOW, and NEUTRAL buttons are implemented as ACTION buttons with appropriate SELECTFNs. The button is highlighted (inverted) while the mouse is tracking, then unhighlighted when the mouse buttons come up and the function is executed.
TOGGLE  	[Button type]ÿÿ

ÿToggles the STATE between ON and OFF. The button is displayed in inverse video when the button is ON. INITSTATE defaults to OFF.
3STATE 	[Button type]ÿÿ

ÿLike TOGGLE, but switches between ON (label is inverted), OFF (label has a strike-out line), and NEUTRAL (label is not inverted).
NWAY 	[Button type]ÿÿ

ÿDefines a collection of mutually exclusive toggles. When one internal button is turned on, the current ON button is turned OFF.  The button's STATE is the identifier of the current ON button, if any. The buttons are provided as the value of the BUTTONS property; they are sorted in the alphabetical order of their labels if the property SORTBUTTONS is true.
FIELD 	[Button type]
Defines a field between { and } for the user to fill in.  A FIELD button has additional properties:
PRELABEL A string to appear, protected, before the field-opening {
POSTLABEL A string to appear after the field-closing }.
LABELFONT Font for the pre and post labels.
FIELDTYPE One of ATOM STRING NUMBER POSITIVENUMBER CARDINAL  IMAGEOBJ.
FIELDFONT Font for the field characters.
If a field is empty, its value is determined by the EMPTYVALUE property.  If that property is not specified, NIL is returned for empty ATOM fields, the empty string "" is returned for empty STRING fields. and the atom **EMPTY** is returned for other field types.
When the mouse is clicked in either the PRELABEL or POSTLABEL of a field button, the cursor moves and flashes inside the following/preceding bracket, for ordinary Tedit input.

(MB.DELETE IDENTIFIERS MENUSTREAM)	[Function]ÿÿ

ÿDeletes the buttons for all IDENTIFIERS in MENUSTREAM.ÿÿ

ÿ
(MB.GET IDENTIFIERS MENUSTREAM RETURNS BEFORE START)	[Function]ÿÿ

ÿReturns information about all the IDENTIFIERS in MENUSTREAM, searching before START if BEFORE, otherwise after.  START is a menu selection, a menu piece, a menu character number, or NIL (= end of the document if BEFORE, otherwise its beginning).
If IDENTIFIERS is an atom, the value is information about just that button.  Otherwise it is a plist keyed by the identifiers in IDENTIFIERS.
RETURNS specifies what kind of information is returned.  It can be any of OBJECT STATE STARTCHNO ENDCHNO STARTPC ENDPC, or a list of those specifiers. If a list, the value will contain for each identifer a list of corresponding items.  RETURNS defaults to OBJECT, and ALL is a shorthand for (STATE OBJECT STARTPC ENDPC STARTCHNO ENDCHNO).
The value for any of the identifiers will be NIL if such a button cannot be found.
Debugging tools: internal/TEDIT-DEBUG
This file contains an assortment of tools for visualizing different Tedit data structures and testing different capabilities.  It is not yet documented and new functions get added as the work proceeds and old ones are revised.  The tools are available for poking around after LOAD(TEDIT-DEBUG.LCOM), but then executing (TEDIT-DEBUG) will set up the environment for more serious debugging.
To give a feeling for what is available, the visualization functions typically begin with the letter S (for "show"), followed by a short/cryptic (because they are typed often) indication of what is to be shown.  Thus (SL) shows the lines in the currently focused Tedit window or stream, SP shows its pieces, SLF displays a parse of the looks-portion of a formatted file, etc.
If there is only one Tedit on the screen, that becomes the focus.  Otherwise, the focus defaults to the Tedit that the mouse is hovering over, and the focus stays that way until one of these functions is executed with the mouse over a different Tedit.
The output goes to the exec window by default, but for some functions the output can be directed to a separate Tedit stream.  Thus (SP NIL T) will show all the pieces of the current stream in a new Tedit window that is scrollable, searchable, and copy-selectable.
Functions beginning with I (for "inspect") will bring up the inspector on  various datastructures.  
(SEQUENCE NIL NIL (0 0 0 0) ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC) STARTINGPAGE# 1) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC)) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (ALTERNATE NIL NIL (0 0 0 0) ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC)) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC)) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC)) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC)) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL)))))))1
$4
È
$

È
4
È
$

È
400
È
$

È
40
È
$

È
1
$4<<
È
$

È
4<<
È

$

È
4HZ
È

$

È
40B
È
$

È
4
È
$

È
7
È
$$
È
7
È
$$
È
7
È
$$
È
40
È
$

È
4$
È

$

È
4
È
$

È
1
È$1ŠŠ
8$1ŠŠ
8$J
È$

È
PAGEHEADINGRUNNINGHEAD	/MODERN
(CHARPROPS (COLOR . BLACK))0CLASSIC
(CHARPROPS (COLOR . BLACK))/MODERN
(CHARPROPS (COLOR . BLACK))/MODERN(CHARPROPS (COLOR . BLACK))1TERMINAL
(CHARPROPS (COLOR . BLACK))rI(TEDIT-FONTCLASS 0 (TERMINAL 8 MRR 0) NIL NIL (POSTSCRIPT NIL) (PDF NIL))(CHARPROPS (COLOR . BLACK))qH(TEDIT-FONTCLASS 0 (MODERN 10 MRR 0) NIL NIL (POSTSCRIPT NIL) (PDF NIL))
(CHARPROPS (COLOR . BLACK))qH(TEDIT-FONTCLASS 0 (MODERN 10 MRR 0) NIL NIL (POSTSCRIPT NIL) (PDF NIL))
ÿþ(CHARPROPS (COLOR . BLACK))3
TIMESROMAN$(CHARPROPS (COLOR . BLACK))	

HRULE.GETFN


HRULE.GETFN


HRULE.GETFN


HRULE.GETFN

HRULE.GETFN

.



+4
B
ô
ž
L

Ð

¿

B

7

5

M

f


%
M
²
8

6
+
3
5
$
O
\


]

¦
e
<03>


l


M

 
£




N




.



¬


H

$
8
L
œ
Z


)



@
1
&

?

 ]
½
[


	

4
‰
	



u
~
-
«

*

Ž
	'
p








K



â


W


%

w




$))



0
3

]
\


é



,




"



,
N



!"

†
 

9

G


:
9

=

=

J




f

J



1
4-'

?)	£

/


<


:F
&

@r


A,
)
È

G



3


!
`







1

3

F

! 
x
a















 "/

7
)






½
[
†


ð

3
-
_
G



È

O
>
‰

£
3
O



V
T
m
“
*


,
„
X
v
ž

e
L
“
J
G

‚
n


±
P


%

"

1

'




#

Q

5

"


>
-

J

Ö

+


3






«
(

+

[


<00>

<01>
—




P
&
[

/

Ý



B
Î
Œ

†

,
%
I
Õ
†

õ
}

(
<








ƒ



„




h

d
	C
	8
	,
	G
	)


°


-

8


?

ø
Ž

S
S
&
…

x
ü


e
(((TEDIT.LAST.FIND.STRING . "multi") (CLEARGET) (CHARENCODING . MCCS)))PROPS:QDATE:k0lDÿ*zº