model_server/gala/src/dis_cmds.cxx
//---------------------------------------------------------------------------------------------------
// <void>  <-  <name> <text>
// This function will add the text line into text spinner. The function will add this line at the end
// of the text spinner list. If it is sorted text spinner, it will call sort() after adding.
//---------------------------------------------------------------------------------------------------
  <-   
This function will add the text line into text spinner. The function will add this line at the end
of the text spinner list. If it is sorted text spinner, it will call sort() after adding.
< - This function will add the text line into text spinner . The function will add this line at the end of the text spinner list . If it is sorted text spinner it will call sort () after adding .
int dis_gdTextSpinAddText(ClientData, Tcl_Interp* interp, int argc, char *argv[]) {
    if (argc != 3) {
	Tcl_SetResult (interp, "wrong number of arguments", TCL_STATIC);
	return TCL_ERROR;
    }
    gdTextSpinner *spinner = (gdTextSpinner *)dis_findItem(interp, (vchar*) argv[1]);
    if(!spinner)  TCL_EXECERR1 ("Text spinner was not found", argv[1]);
    spinner->AppendText((unsigned char *)argv[2]);
	spinner->MarkListDirty();
    return TCL_OK;
}
int dis_gdTextSpinAddText ( ClientData , Tcl_Interp * interp , int argc , char * argv [ ] ) { if ( argc != 3 ) { Tcl_SetResult ( interp , " " , TCL_STATIC ) ; return TCL_ERROR ; } gdTextSpinner * spinner = ( gdTextSpinner * ) dis_findItem ( interp , ( vchar * ) argv [ 1 ] ) ; if ( ! spinner ) TCL_EXECERR1 ( " " , argv [ 1 ] ) ; spinner -> AppendText ( ( unsigned char * ) argv [ 2 ] ) ; spinner -> MarkListDirty ( ) ; return TCL_OK ; }
<void>  <-  <name> <text>
This function will add the text line into text spinner.
<void > < - <name > <text > This function will add the text line into text spinner .